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5 
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,2 IDENTIFICATION 
10 

11 

12 PRODUCT CODE: AC-F612D-MC 

H PRODUCT NAME: CKKTBDO 11/44 MEM MGMT PRT B 

16 DATE: JANUARY, 1982 

13 MAINTAINER: DIAGNOSTIC ENGINEERING 
19 

20 AUTHOR: DAN P. MILLEV/LLE 

L I 

22 
23 
?4 
;?5 

26 THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT 

?Z NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGIIAL 

28 EQUIPMENT CORPORATION. DIGITAL EQUIPMENT CORPORATION ASSUMES 

^9 NO RESPONSIBILITY FOR ANY ERRORS THAT MAY APPEAR IN THIS 

30 DOCUMENT. 

32 THE SOFTWARE DESCRIBED IN THIS DOCUMFNT IS FIRNISHEO TO THE 

33 PURCHASER UNDER A LICENSE FOR USE ON A SINGLE CdPUTER SYSTEM 

If* AND CAN BE COPIED (WITH INCLUSION OF DIGITAL'> COPYRIGHT NOTICE) 

I) ONLY FOR U.^r IN SUCH SYSTEM. EXCEPT AS MAY 0"^HERWISE BE PROVIDED 

36 IN WRITING BY DIGITAL. 

38 DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY 

?9 FOR THE USE OR RELIABILITY OF ITS SOFTWARE ON EQUIPMENT 

40 THAT IS NOT SUPPLIED BY DIGITAL. 
41 

^2 COPYRIGHT (C) 1979, 1982 BY DIGITAL EQUIPMENT CORPORATION 
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SEQUENCE 



A3 
AA 
A5 
A6 
A7 
A8 
A9 
50 
51 
52 
55 
5A 
55 



PROGRAM HISTORY 



DATE 


REVISION 


OCTOBER. 1979 
DECEMBER, 1979 
APRIL, 1981 


A 
B 
C 


JANUARY, 1982 


D 



REASON FOR REVISION 

FIRST RELEASE 

ADDITION OP 'CSM* TEST 35 

USING NEW SYSMAC WITH *0 CHECKS AND BIT CflECK 

OF THE POWER MONITOR BIT OF CPUERR REGISTtR. 

MODIFIED CODE TO ACCOMODATE ECO tt 8. 

ECO ft 8 WAS MODIFIED, CODE CHANGED TO REFLECT 

THE MODIFICATION. 
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58 
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84 
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87 5.2 PROGRAM LISTING 

8*^ 5.3 USING THE PROGRAM TO DIAGNOSE A FAULT 
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90 1.0 PROGRAM INFORMATION 

91 ^^ 

92 

"^3 IJ ABSTRACT 

9A 

9S 

96 THIS PROGRAM WAS DESIGNED USING A 'BOTTOM UP" APPROACH 

97 STARTING WITH THE SMALLEST SEGMENT OF MEMORY MANA6MENT 

98 LOGIC POSSIBLE AND BUILDING TO COVER ALL OF THE LOGIC. 

99 THE DIAGNOSTIC 'JILL PROVIDE ENOUGH INFORMATION SUCH THAT 

100 BY DEDUCTION, THE FAILURE CAN BE ISOLATED TO A f.^lALL 

101 SEGMENT OF THE MEMOKY MANAGEMENT LOGIC. 

10^ PART A BEGINS BY TESTING SOME OF THE INTERNA! ChU D^TA 

104 AND ADDRESS PATHS AND ADDRESS DETECTION LOGIC, THEN 

105 WORKS OUTWARD THROUGH THE MEMORY MANAGEMENT REGISTERS. 

106 AFTER THE REGISTERS ARE FOUND TO BE USEABLE, RELOCATION 

107 (CONSTRUCTION OF PHYSICAL ADDRESSES FROM A VIRTUAL ADDRESS 

108 AND THE ASSOCIATED PAR/PDR INFORMATION) IS TESTED. PART B 

109 BEGINS BY TESTING THE ABORT AND STATUS SEGMENTS OF LOGIC. 

10 PART B THEN CHECKS THE SPECIAL ABORT SEQUENCES, THE MFPI/ZITPI 

11 INSTRUCTIONS AND THE CSM INSTRUCTION. 

113 1.2 REQUIREMENTS 

1U 

115 

116 A PDP 11/44 PROCESSOR WITH A MINIMUM OF 16K OF MEMORY 

17 AND A CONSOLE TERMINAL ARE REQUIRED TO RUN THE PROGRAM 

]S UNLESS THE PROGRAM IS RUNNiNG UNDER APT OR ACT IN WHICH 

11? CASE THE CONSOLE TERMINAL IS NOT NECESSARY. 
120 

121 1.3 RELATED DOCUMENTS AUO STANDARDS 

.23 

124 1. ACT11/XXDP PROGRAMMING SPECIFICATION 

1^5 ?. STANDARD APT SYSTEM TO A PDP1 1 DIAGNOSTIC INTERFACE 

1^^ 3. DIAGNOSITC ENGINEERING STANDARDS AND CONVENTIONS 

1^^ 4. PDP11 MAINDEC SYSMAC PACKAGE 

128 5. XaDP USER'S MANUAL 

130 1,4 PRELIMINARY PROGRAMS 

1 32 

133 BEFORE THIS MEMORY MANAGEMENT DIAGNOSITC IS RUN, THE 
154 FOLLOWING DIAGNOSTICS SHOULD BE RUN: 

136 CKKAAAO 11/4 CPU/EIS 

137 CKKABAO TRAPS 

139 ALSO, THE MAIN MEMORY DIAGNOSTIC (CZMSD) SHOULD BE RUN TO SCAN 

1^0 AT LEAST THE FIRST 16K TO SEE THAT A PROGRAM CAN BE EXECUTED. 
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U1 2.0 OPERATiNG INSTRUCTIONS 
U2 



U3 

V^A 2.1 LOADING PROCEDURES 

IAS 

U6 

H7 THE PRuGRAM IS SUPPLIED ON THE DIAGNOSTIC LOAD MEDIA. 

H8 REFER TO THE XXDP USEh'S MANUAL FOR FURTHER INFORMATION. 

H*? FOR USE WITH AC". OR APT, RE7^R TO TKEJR RESPECTIVE 

150 DOCUMENTS. THE PROGRAM CAN ALSO u^f DIRECTLY LOADEu 

1^1 USING THE ABSOLUTE LOADER ANi> THE BINARY PAPER TAPE. 

155 2.2 STARTING PROCEDURES 
ISA 

155 

156 THE PROGRAM IS STARTED BY LOADING ADDRESS 200 AND 

157 STARTING. THE SWITCH REGISTER SHOULD B^ SET ACCORDING U) 

158 SECTION 2.3 BEFORE THE PROGRAM IS STARTED. HOWEVER. If 

159 DESIRED, THE PHOGRAM WILL USE THE SOFTWARE SWITCH REGISTER 

160 AT LOCATION U6 (LOCATION 17A WILL BE USED AS THE SOFTWARE 

]^\ DISPLAY REGISTER), IN THAT CASE, THE PROGRAM WILL ASK FOR 

162 THE INITIAL SWITCH REGISTER VALUE BY TYPING "SWR= XXXXXX 

:6i NEW= •* AFTER TYPING THE NAME OF THE PROGRAM (XXXXXX = 

16^ THE OCTAL CONTENTS OF LOCATION 176). (SEE SECTION 2. A) 
165 

166 ALSO THE PROGRAM CAN BE MADF TO USE THE SOFTWARE SWITCH 

'6/ REG. EVEN If THE CONSOLE SWITCH REG. IS PRESENT BY LOADING 

68 ''MlllT' INTO THE CONSOLE SWITCH REG. BEFORE STARTING 

1Ci9 THE PROGRAM. 
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SEQUENCE 



170 
171 
172 
173 
174 
175 
176 
177 
178 
179 
180 
181 
182 
185 

18'; 

185 
186 
187 
188 
189 
190 
191 
192 
195 
19A 
195 
196 
197 
198 
199 
200 
201 
202 
205 
204 
205 
206 
207 
208 
209 
210 
211 
212 
213 
?U 
?15 



2.3 CONTROL SWITCH SETTINGS 

SWITCH OCTAL VALUE 
SW15 100000 



USE 



HAL1 ON ERROR 

THIS SWITCH WHEN SET WILL HALT 
THE PROCESSOR WHtN AN ERROR IS 
DFTECfED AFTER THE ERROR MESSAGE 
HAS BtiEN TYPED. PPCSSING CONTINUE 
WILL RESUME TESTING (SEE SECTION 
3.1 ABOUf LOADING THE SWITCH REG 
BEfORE CONTINUING). 



SWU 



040000 



SW13 020000 



SW12 010000 



SWIO 002000 



SW9 



001000 



SW8 



000400 



LOOP ON TEST 

THIS SWITCH WHEN SET WILL 
CAUSE THE PROGRAM TO LOOP ON 
THE CURRENT SUBTEST. 

INHIBIT ERROR TVPEOUTS 

THIS SWITCH WHEN SET WILL 
INHIBIT THE TYPING OF ERROR 
MESSAGES. 

INHIBIT TRACE T.^AP 

THIS SWITCH WHEN SET WILL 
INHIBIT T-8IT TRAPPING WHICH 
NORMALLY TAKES PLACE DURING 
EVERY OTHER PASS STARTING 
WITH THE THIRD PASS. 

BELL ON ERROR 

THiS SWITCH WHEN SET WILL RING 
Th:: CONSOLE TERMINAL BELL WHEN 
AN ERROR HAS BEEN DETECTED. 

LOOP ON ERROR 

THIS SWITCH WHEN SET WILL 
CAUSE THE PROGRAM TO 1 OOP oN THE 
FIRST FAILURE WHICH IS ENCOUNTERED 
EVEN IF THE FAILURE IS iMTERMITTANT 

LOOP ON TEST IN SWR<7:0> 

THIS SWITCH WHEN SET WILL 
CAUSE THE PROGRAM TO LOOP ON THE 
TEST WHOSE TEST NUMBER IS SET 
IN BITS 7-0 OF THE SWITCH REG. 



H 1 
CK<TBDO 11 /A4 MEM M6MT PRT B MACRO Mil 13 12-JAN-8^ 12:19 PAGE 8 SEQUENCE 

21"/ 2. A LOADING THE SWITCH REGISTER 

21 8 

219 

220 THE CONSOLE SWITCH REGISTER PROVIDED IS LOADED DIP^CTLy FROM 

?21 THE CONSOLE BY TYPING A CONTROL P rP) . THEN WHEN THE CONSOLE 

2<2 PROMPT IS RECIEVED, TYPL 'D SW XXXXXX", WHERE '"XXXXXX*' IS THE 

223 INTENDED VALUE OF THE SWI I CH REGISTER. THE VALUE OF THE 

22^ CONSOLE SWITCH REG. CAN BE CHANGED ANY TIME WHETHER THE PROGRAM 

225 IS RUNNING OR NOT. 

?26 

227 rO LOAD THE SCrTWAR: '^'wiTCH REG. WHILE THE PKI^GRAM IS 

228 RUNNING, A CiNTROt j (^6) SHOULD BE TYPED ON THE CONSOLE 
^29 TERMINAL. iTK" "SCOPE* * AND 'tRROR" ROUTINES CHECK TO SEE 
250 IF A *6 HAS BEEN TYPED.) THE ORIGIfJAL VALUE OF THE SOFTWARE 
231 SWTICH REG. WILL BE REQUESTED AS MENTIONED IN SECTION 2.2. 

2JJ W RESPONSE TO A 'G OR AT THE BEGINNING OF THE PROGRAM, THE 

25A PROGRAM WILL TYPE: 

235 

236 SWR = XXXXXX NEW = 

238 WHERE "XXXXXX" IS THE CURRENT OCTAL CONTENTS OF LOC. 176. 

239 THE OPERATOR MAY THEN TYPE ANY ONE OF THE FOLLOWING: 
2^0 XXXXXX<CR> ONE TO SIX OCTAL DIGITS FOLLOWED BY A 
2A1 CARI^IAGE RETURN WHICH WILL BE LOADED 
2^2 AS THE NEW VALUE FOR THE SWITCH REG. 
2^3 <CR> JUST A <CR>, LEAVES THE SWITCH REG. 
2^J AS IT IS. 

2^5 XXX'^U A CONTROL-U (*U) WILL CAUSE ALL OF THE 

2A6 DIGITS TYPED SO FAR TO BE IGNORED. 

2^1 *C WILL CAUSE THE PROGRAM TO TYPE THfc PRESENT 

2^8 TEST AND PASS NUMBERS, RFUUEST A NEW VALUE 

2^9 FOR THE SWITCH REG., AND JUMP TO THE END- 

250 OF PASS ROUTINE SO THE PROGRAM WILL GO DIRECTLY 

2^^l TO THE NEXT PASS WITH A NEW SW. REG. VALUE 

2^2 <JLL.CHAR> ANV CHARACTER TYPED WHICH IS NOT ANY OF THE 

^53 ABOVE OR AN OCTAL DIGIT WILL CAUSfc THE "PROGRAM 

2^^ TO TYPE A "?<CRLF>" AND REACT AS 1H0U6H A 

25^ *U HAD BEEN TYPED. 

256 

257 NOTE: RECOGNITION OF A *G MAY BE HAMPERED BY 

258 EXFCUTION OF A COUPLE "RESET" INSTRUCTIONS 

259 WITHIN THE PROGRAM. 

261 2.5 EXECUTION TIMES 

26t ----------.----ta 

263 

^(>i THE RUN TIME FOR A SINGLE PASS WITH TRACE TRAPPING 

^^^ ENABLED IS APPROXIMATELY 5 SECONDS WITH CACHE. 
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266 3.0 CRiOR INFORMATION 

26? 

268 

269 3.1 ERROR REPORTING PROCEDURES 

270 

271 

272 Jf AN ERROR IS DETECTED, THE PRQiiRAM WILL TRAP TO THE 

273 ERROR HANDLING ROUTINE (SERROH). THt= VALUE OF BITS 

274 1!)J3J0. Af^D 9 IN THE SWITCH REGISTER ARE CONSIDERED 
'2r^ IN REPORTING AN ERROR (SEE SECUUN 2.3). THE 

276 ERROR INFORMATION WILL BE TY'^ED UNLESS SW13 = 1. 

2^8 IF SW15 = 1, IH:: PROCESSOR WILL HALT .niH THE ^RROR IS 

279 REPORTED. U THE CONTENTS OF THE SOFTWARE SWITCH REGISTER 

280 ARE ro BE CHANGED, A '^G SHOULD HE TYPED BEFORE PRESSING 

281 "CONTINUE" TO RESUME TESTING. 
28? 

28? IF SW9 = 1 (LOOf^ ON ERROR). TH: PROGRAM WILL GO TO THE 

284 ADDRESS CONTAINED IN LOCATION "$LPERR". AFTER REPORTING 

285 THE ERROR. "SLPERR" IS SET BV EACH "SCOPE" CALL AND IS 

286 S^} DIRECTLY INURING SOME SUBTESTS TO PROVIDE THE SMALLEST 
<8/ LOOP FOR LOOPif^G ON ERROR. IF SW9 = 0, THE PROGRAM WILL 

288 RETURN TO THE INSTRUCTION FOLLOWING THE ERROR CALL. 

289 (SEE SECTION 5.3 iOR MORc ON "LOOP ON ERROR"). 

291 3,2 INTERPRETING ERROR REPORTS 

?v3 

294 EVERY ERROR REPORT TYPES THE Nl^ER OF THE TEST IN WHICH 

29^ THE ERROR TOOK PLACE (TESTNO) AND THE LOCATION OF THE 

296 ERROR CALL (ERRORPO . THESE TWO VALUES PINPOINT THE 

297 PLACE IN THE CODE THAT THE ERROR OCCURRED. BY REFERRING 

298 TO THE PROGRAM LISTING, THE OPERATOR CAN THEN READ THE 

299 COMMENTS ASSOCIATED WITH THAT PARTICULAR ERROR AND SUBTEST. 

300 A DESCRIPTION OF THE TEST FOUND IN THE P^HGRAM LISTING 

301 WILL ALSO PROVIDE THE OPERATOR WITH INFOkMATION ON THE LOGIC 
5^2 AND FUNCTIONS BEING TESTED. 

304 EVERY ERROR REPORT ALSO TYPES AN ERROR MESSAGE 

305 GIVING A VERBAL DESCRIPTION OF THE ERROR THAT HAS 

306 BEEN DETECTED. 

308 BY USING THE COMMENTS AND TEST DESCRIPTION FOUND IN 

309 THE PROGRAM LISTING TO DETERMINE WHAT FUNCTION OR 

310 LOGIC WAS BEING TESIED, THE OPERATOR CAN THEN REFER 
^\\ TO THE ENGINEERING DRAWINGS TO ISOLATE THE PROBABLE 
312 CAUSE FOR THE FAILURE. 
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SEQUENCE 



i15 
3K 
515 
316 
317 
318 
319 
320 
321 
322 
523 
32A 
325 
326 
327 
328 
329 
330 
331 
352 
355 
33A 
355 
336 
357 
338 
339 
3A0 

:<M 

/'-2 

3*; 5 

344 
3^5 
346 
347 
348 



3. 



3.4 



SAMPLE ERROR REPORT 



BELOW IS AN EXAMPLE OF AN ERROR WHICH COULD HAVE 
OCCURRED DURING FXECUTIO^J OF THE PROGRAM: 

MEM. MGHl. REG. BITS NOT SET CORRECTLV 

RE6ISTR WROTE READ READ"(BINARY) 

f^ODRESS (OCTAL) (OCTAL) 5432109876543210 TESTNO 

177572 040000 060000 0110000000000000 000012 



ERRORPC 
022060 



WE SEE THAT THE ERROR OCCURRED IN TEST 12 AT LOCATION 
022060. THE 'l^fcGISTER ADDRESS" TELLS US THAT WE WERE 
TESTING MEMORY MANAGEMENT'S STATUS RGISTER (SRO). 
IN THE LISTING, THE TEST DESCRIPTION SAYS THAT THE 
ERROR BITS (BITS <15:13» OF SRO WERE BEING SET AND 
CLEARED iNDIVIDUAlLY. THE ERROR REPORT SAYS WE TRIED 
TO SET BIT 14 BY WRITING "040000" TO SRO BUT WHEN WE 
READ IT BACK WE READ "060000". IT APPEARS THAT BIT 13 1$ 
STUCK AT "1" OR IT IS GETTING SET WHEN BIT 14 IS SET 
TO "1". ERROR REPO'^TS BEFORE AND AFTER THIS ONE COULD 
TELL US WHICH IS THE CASE. 

POWER MONITOR BIT ERRORS 

WHEN THE POWER MONITOR BIT (BIT OF THE CPU ERROR REGISTER) BECOMFS 
SET DURING THE RUNNING Of THIS DIAGNOSTIC, THE SSCOPE ROUTINE WILL 
CALL AN E^ROR. IF THE BIT SHOULD BECOME SET AFTER THE SSCOPE ROUTINE 
AND BEFORE AN ERROR. AND THE ERROR iS CALLED FOR ANY REASON, THE ERROR 
ROUTINE WILL CALL *TWO* ERRORS, THE FIRST ERROR WILL BE JHt POWER 
MONITOR BIT ERROR CALL, THEN THE ERROR CALL ORIGINAL! Y CALLEJ WILL BE 
PRINTED. IN ANY CASE. LOOP-ON-ERROR IS DISABLED FOR THIS ERROR ONLY. 
IT IS RECOMMENDED THAT IF THIS ERROR SHOULD BE CALLED. THAT THE PROBLEM 
CAUSING THE BIT TO BE SET BE REPAIRED BEFORE RELYING ON THE RESULTS OF 
RUNNING THIS DIAGNOSTIC, 
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349 4.0 MISCELLANEOUS INFORMATION 

350 

351 

352 A.I ACT/APT/XXDP COMPATABILITY 

353 

35^ 

555 THE PROGRAM IS FULLY ACT AND APT C0MPATA8LE 

356 AND IS SUPPORTED UNDER THE XXDP PACKAGE. 

358 A. 2 END-OF-PASS MESSAGE 

359 

360 

361 AT THE END OF EACH PASS OF THE PROGRAM THE PASS NUMBER 

362 AND TOTAL NUMBER OF ERRORS SINCE THE LAST END-OF-PASS ARE 

363 RtPORTED IN THF END-OF-PASS MESSAGE. FOR EXAMPLE: 
^6A 

^65 END OF PASS ^2 TOTAL ERRORS SINCE LAST REPORT 
366 

367 THAT WOULD INDICATE THAT PASS TWO WAS JUST COMPLETED 

368 AND NO ERRORS WERE DETfcCTED DURING THAT PASS. BOTH 

369 THE PASS NUMBER AND NUMBER OF ERRORS ARE DECIMAL NUMBERS. 

371 A. 3 T-6IT TRAPPING 

372 

37? 

37A THE *'T-8IT'* (BIT A) IN THE PROCESSOR STATUS WORi) IS SET 

375 BY AN *'f^JV* IN THE END-OF-PASS ROUTINE FOR EVERV OTHER PASS 

376 BEGINNING WITH THE THIRD PmSS (PASSES 3,5,7,9...). T-BIT 

377 TRAPPING CAN BE INHIBITED BY SETTING BIT 12 = 1 IN THE SWITCH 
578 REGISTER (SEE SECTION 2. A), 

380 A, A POWER FAILURE HANDLING 

^81 

382 

385 IF A POWER FAIL OCCURS (FOLLOWED BY A POWER UP), THE 

38A MESSAGE 'T>OWER FAILURE-RESTARTING" IS TYPED OUT AND 

385 THE PROGRAM WILL RESTART EXECUTION AT "START:" (THE 

386 VERY BEGINNING OF THE PROGRAM. IP THE SOFTWARE 

387 SWITCH REGISTER iS BEING USED. ITS CONTENTS WILL BE 

388 RESTORED, 
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389 

590 
391 

392 
393 

39A 
395 
396 
397 
398 
399 
AOO 
^01 
A02 
A03 
AOA 
405 
A 06 
A07 
A08 
40V 
410 
411 
412 
413 
414 
415 
416 
41^ 
418 
419 



^.5 PHYSICAL BUS ADDRESS CONSTRUCTION 



BELCW IS A SIMPLIFIED DIAGRAM OF HOW THE MEMORY 
MANAGEMENT LOGIC CONSTRUCTS A PHYSICAL BUS ADDRESS 
USING THE VIRTUAL ADDRESS AND THE PAGE ADDRESS REGISTER. 
THE PAGE DESCRIPTOR REGISTER SELECTED WILL CONTAIN THE 
PAGE EXPANSION, LENGTH, AND ACCESS INFORMATION. 



12 n 10 09 08 07 06 05 04 03 02 01 00 
/ 1 1 1 1 1 1/ 1 1 1 1 1 0/ V8A* 



(ADDED TO) 
15 U 13 12 11 10 09 08 07 06 05 04 03 02 01 00 
/01 0100010100000 1/ 



PAR** 



I 

I i 

V V 

21 20 19 18 17 16 15 14 13 12 11 10 09 08 07 06 05 04 03 02 01 00 

/01 010001100000001 1 1 110/P8A 

*= V8A BITS <1^.13> SELECT THE APPROPRIATE PAR AND PDR 
**= PSW MODE BITS <15:14> SELECTS THE USER (=11), SUPERVISOR 
(=01) 0*^ KERNEL (=00) SET OF PAR'S/PDR*S 
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^20 5.0 PROGRAM DECCRIPTION 

A21 

422 

42? 5.1 SUBROUTINES USED BY THIS PROGRAM 

^24 

425 

426 FOL'-OWJNG IS A LIST OF THE SUBROUTINES AND HANDLERS USED 

427 BY THIS PROGRAM THAT ARE NOT PROVIDED BY THE "SYSMAC 

428 PACKAGE". DETAILS OF THE SUBROUTINES UNIQUE TO THIS 

429 PROGRAM MAY BE FOUND IN THE PROGRAM LISTING. REFER TO 
450 THE "SYSMAC" DOCUMENT AND PROGRAM LISTING FOR THE OTHER 
431 ROUTINES. 

452 

455 1. TURN OFF T-BIT AND SAVE CURRENT P' : 

454 2. TURN ON T-8IT AND RESTORE PREVIOUS PSW 

455 3. SET ALL WR1TEA8LE BITS IN ALL PAR/PDr/S 
436 4. CONVERT VIRTUAL ADDRESS TO PHYSICAL ADDRESS 
457 

438 NOTE ALSO THAT THE MACRO LIBRARY USED TO ASSEMBLE THIS PROGRAM 

459 HAS OTHER SPECIAL ROUTINES APPENDED TO THE SYSMAC MACRO PACKAGE; 

440 THIS LIBRARY MUST BE USED TO ASSEMBLE EITHER PART A OR PART B 

^'*1 CORRECTLY. 
442 

445 5,2 PROGRAM LISTING 
/,A4 

445 

446 A TABLE OF CONTENTS APPEARS AT THE BEGINNING OF THE LISTING 
'=»47 WHICH CONTAINS THE NAMES OF EACH SECTION, SUBTEST, AND 

448 ROUTINE AND THE LINE NUMBERS CORRESPONDING TO THE START OF 

449 EACH. 
450 

^51 FOLLOWING THIS SECTION OF DOCUMENTATION IS THE ACTUAL 

^^? PROGRAM LISTING COMPLETE WITH SUBTEST DESCRIPTIONS AND 

453 "CODING COMMENTS". 
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A54 5.3 USING THE PROGRAM TO DIAGNOSE A FAULT 

455 



456 

457 WHEN AN ERROR OCCURS, ' f OF THE THING. THAT'S IMPORTANT 

458 TO NOlE IS WHAT PASS L... RROR OCCURKCO ON. IF THE PASS 

459 NUMBER IS ODD AND IS THRLc OR GHcATER, .IE ERROR MIGHT BE 

460 T-eiT SENSITIVE. TRY RUNNING THE PROGRAM* AGAIN WITH .'H 

461 12 OF THE SWITCH REG. EQUAL fO "1" TO IN;-*I8IT T-BIT 

462 TRAPPING. THIS SHOULD HELP YOU DETERMINE WHAT MAKES THE 
465 MACHINE FAIL AND WHEN. 

465 IF YOU HAVE BEEN RUNNING WITH BIT 15 OF THE SWITCH 

466 REG. EQUAL TO "O", THEN YOU ARE ABLE TO LOOK AT ALL 

467 THE ERRORS THAT MAY BE RELATED TO THE FAULT YOU ARE 

468 DIAGNOSING. A FAULT IN AN EARLIER TEST MAY RESULT IN 

469 ERRORS DURING LATER TESTS WHICH MAY GIVE YOU MORE 

470 CL'FS ABOUT THE NATURE OF THE FAULT. NOW USE VT- METHOD 
^71 OURINED IN SECTION 3.2 FOR EACH ERROR TO GATHER AS 

472 MUCH INFORMATION AS POSSIBLE. 
473 

474 NOW TO TEST YOUR IDEAS ON THE CAUSE OF THE FAILURE. 

475 YOU MAY WANT TO SCOPE THIS ERROR CONDITION. SET BIT 09 

476 OF THE SWITCH REG. EQUAL TO 'T* TO LOOP ON THE ERROR. 
"^11 FOR AN EVEN TIGHTER SCOPE LOOP THE ERROR CALL CAN BE 
^78 REPLACED WITH A BRANCH (REFER TO COMMENTS BY ERROR CALLS 

479 IN THE PROGRAM LISTING). 
480 

481 OR YOU COULD LOOP ON THE TEST BY EITHER SETTING BIT 14 

482 OF THE SWITCH REG. EQUAL TO "1" OF BY SETTING BIT 08 OF THE 
485 SWITCH REG. EQUAL TO "V AND THEN SETTING THE TEST NUMBER 

484 IN BITS 07-00 OF THE SWITCH REG. YOU WILL PROBABLY WANT TO 

485 INHIBIT ERROR TYPECUTS BY SETTING BIT 13 OF THE SWITCH REG. 

480 EQUAL TO "1". 
48/ a 
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15 



SEQUENCE 1A 



119A 
1195 



1196 



1197 



001100 
10AOOO 
00000^ 

000011 
000012 
000015 
000200 
177776 
177776 
17777A 
M1712 
177570 
177570 

000000 
000001 
000002 
000003 
00000^ 
000005 
000006 
000007 
000006 
000007 

000000 
OOOOAO 
000100 

ooouo 

000200 
0002A0 
00C300 
0003A0 



TITLE CKKTBDO 11/4A MEM MGMT PRT B 
*C0PVRI6HT (C) 1982 
♦DIGITAL EQUIPMENT CORP. 

*MAYNARD. MASS. 0175A 

* 

"THIS PROGRAM WAS ASSEMBLED USING THE PDP-11 MAINDEC SYSMAC 

^PACKAGE (MAINDEC-11-DZQAC-C5), JAN, 1981. 



SBTTL 


OPERATIONAL 


SWITCH SETTINGS 




SWITCH 


USE 




15 


HALT ON ERROR 




U 


LOOP ON TEST 




13 


INHIBIT ERROR TYPtOUTS 




12 


INHIBIT TRACE TRAP 




10 


BELL ON ERROR 




9 


LOOP ON imm 




8 


LOOP ON TEST IN .SWR<7:0> 


S8TTL 


BASIC DEFINITIONS 



MNITIAL ADDRESS OF THE STACK 
STACK- 1100 

ERROR^EMT 

SCOPE^IOT 
;*MISCELlANl"OUS DEFINITIONS 



POINTER *** 1100 *** 



HT = 
LF- 

CR= 
CRLFn 

PS^ 



STKLMT= 
PIRQ=^ 
DSWR= 
DDISP^ 



11 

12 

IS 

200 

177776 

PSW=PS 

17777A 

Mini 

177570 

177570 



R0= 
R1 = 
R2= 
R5= 

RA:: 

R5- 
R6-- 
R7= 
SP= 
PC^ 



XO 
XI 
X2 
X3 
XA 
X5 
X6 
X7 
X6 
X7 



;*PRIORITY LEVEL 



PRO--^ 
PR1 = 
PR2= 
PR3= 
PRA = 
PR5= 
PR6-^ 
PR 7= 





AO 

100 

lAO 

200 

2A0 

300 

3A0 



CODE 
CODE 
CODE 
CODE 



FOR 
FOR 
FOR 

FOR 



TAB 



HORJZONTAl 
LINE FEED 
CARRIAGE RETURN 
CARRIAGE RETURN-LINE 
PROCESSOR STATUS WORD 



FEED 



STACK LIMIT REGISTER 
PROGRAM INTERRUPT REQUEST REGISTER 
HARDWARE SWITCH REGISTER 
HARDWARE DISPLAY REGISTER 
;*GENERAL PURPOSE RlGISTER DEFINITIONS 

GENERAL REGISTER 

REGISTER 

REGISTER 

REGISTER 

REGISTER 

REGISTER 

REGISTER 

REGISTER 



GENERAL 
GENERAL 
GENERAL 
GENERAL 
GENERAL 
GENERAL 
GENERAL 
STACK POINTER 
PROGRAM COUNTER 
DEFINITIONS 

PRIORITY LEVEL 
PRIORITY LEVEL 1 
PRIORITY LEVEL 2 
PRIORITY LEVEL 3 
PRIORITY LEVEL A 
PRIORITY LEVEL 5 
PRIORITY LEVEL 6 
PRIORITY LEVEL 7 



IKKTBDO 11 /AA MEM MGMT 
BASIC DEFINITIONS 



100000 
040000 
020000 
010000 
OOAOOO 
002000 
001000 
000400 

or '^00 
oouioo 

000040 
000020 
000010 
000004 
000002 
000001 
001000 
000400 
000200 
000100 
000040 
090020 
000010 
000004 
000002 
000001 

100000 
0400CO 

020100 

010000 
004000 
002000 
001000 
000400 
0C0200 
000100 
000040 
000020 
000010 
000004 
000002 
000001 
001000 
000400 
000200 
000100 
000040 
000020 
000010 
000004 
000002 
000001 

000004 
000010 
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C 2 
15-1 



SEQUENCE 15 



;*'*SWI 

SW15= 

SW14= 

SW13= 

SW12= 

SW11 = 

SW10= 

SW09= 

SW08^ 

SW07= 

SW06= 

SW05= 

SW04^ 

SW03= 

SW02= 

SW01 = 

SWOO= 



;*DATA 
BIT15= 
BiT14= 
BIT13- 
BI112= 
BIT11= 
B]riO= 
BiT09= 
BJf08= 
BIT07= 
BJT06= 
BJT05= 
BIT04= 
BJT03^ 
BIT02= 
BIT01= 
BJT00= 



TCH REGISTER'* SWITCH DEFINITIONS 
100000 
40000 
20000 
10000 
4000 
2000 
1000 
400 
200 
100 
40 
20 
10 
4 
2 
1 

SW9=SW09 
SW8=SW08 
SW7:rSW07 
5U6=SU06 
SW5=SW05 
SW4=:SU04 
SW3=SW03 
SW2=SW02 
SW1=SW01 
SW0=SW00 
Bit DEFINITIONS (BITOO TO BIT15) 
100000 
40000 
20000 
10000 
4000 
2000 
1000 
400 
200 
100 
40 
20 
10 
4 
2 



;*BASI 
ERRVEC 
RESVEC 



C 



BIT9= 

BIT8= 

BIT7= 

BIT6= 

Bir5= 

BIT4= 

BIT3= 

BIT2= 

BIT1 = 

B1T0= 

^XPU' 

4 

10 



Bir09 
61 T08 
8IT07 
81 T06 
BIT05 
8IT04 
8IT03 
BIT02 
BITOl 
BITOO 
' TRAP 



VECTOR ADDRESSES 

;;TIME OUT AND 
;;RESERVED AND 



OTHER ERRORS 
ILLEGAL INSTRUCTIONS 





D 2 


.i 
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SEQUENCE 16 


BASIC DEFINITIONS 






OOOOU 


TBJTVEC=14 ; 


;"T" BIT 




OOOOU 


TRTVEC- 14 


; TRACE TRAP 




OOOOU 


BPTVEC= 14 


;BREAKPOINT TRAP (8PT) 




000020 


I0TVEC= 20 


; INPUT/OUTPUT TRAP (lOT) **SCOPE** 




000024 


PWRVEC= 24 


; POWER FAIL 




000030 


EMTVEC= 30 


; EMULATOR TRAP (EMT) **ERROR** 




00003A 


TRAPVEC=i4 


;"TRAP" TRAP 




000060 


TKVEC= 60 ; 


;TTy KEYBOARD VECTOR 




000064 


TPVFC= 64 


;TTY PRINTER VECTOR 




000240 


PJRQVEC=240 


; PROGRAM INTERRUPT REQUEST VECTOR 




1198 


.SBTTL MEMORY MANAGEMENT DEFINITIONS 
;*KT11 VECTOR ADDRESS 




000250 


MMVEC-- 250 

;*K:t11 status REGISTER ADDRESSES 




17;'5/2 


SRO= 177572 




177574 


SH1= ':77574 




177576 


SR2= 177576 




172516 


SR3= 172516 

;*USi:R "J" PAGE DESCRIPTOR REGISTERS 




177600 


UIPDRO= 177600 




177602 


UIPDRI^ 177602 




1 77604 


\MPbn2^ ^7760i* 




177606 


UIPDR3= 177606 




177610 


UIPDR4= 177610 




''//'612 


UIPDR5= 177612 




177614 


UIPDR6= 177614 




177616 


UIPDR7= 177616 

;*USER "D" PAGE DESCRIPTOR REGISTORS 




177620 


UDPDR0= 1/7620 




177622 


UDPDR1= 177622 




177624 


UDPDR2= 177624 




177626 


UDPDR3= 177626 




177630 


UDPDR4=: 177630 




177632 


UDPDR5= 177632 




177634 


UDPDR6= 177634 




177636 


UDPDR7= 177636 

;*USER "I" PAGE ADDRESS REGISTERS 




177640 


UIPARO= 177640 




177642 


UIPAR1= 177642 




177644 


UIPAR2= 177644 




177646 


UIPAR3= 177646 




177650 


UIPAR4= 177650 




177652 


UIPAR5= 177652 




177654 


UIPAR6= 17/654 




177656 


UIPAR7= 177656 

;*USER "D" PAGE ADDRESS REGISTERS 




177660 


UDPARO= 177660 




177662 


UDPAR1= 177662 




1 77664 


UDPAR2=: 177664 




177666 


UDPAR3= 177666 




177670 


UDPAR4= 177670 




M7t72 


U0PAR5= 177672 




177674 


UDPAR6= 177674 




177676 


UDPAR7= 177676 

••♦SUPERVISOR **I"PAG£ DESCRIPTOR REGISTERS 




1 72200 


SIPORO^ 172200 




V2202 


SIPDR1= 172202 


t 
1 

1 



CKKTBDO 11/4^ MEM MGMT PRT B 
MEMORY MANAGEMENT DEFINITIONS 

17220A 
172206 
172210 
172212 

172216 

172220 
172222 
172224 
172226 
172230 
172232 
(72234 
172236 

1722A0 
172242 
172244 
172246 
172250 
172252 
172254 
172256 

172260 
172262 
172264 
172260 
172270 
M2272 
172274 
172276 

172300 
172302 
172304 
172306 
172310 
172312 
172314 
172316 

172320 
172322 
172324 
172326 
1 72330 
1 72332 
172334 
172336 

172340 
172342 
172344 
1 72346 
172350 
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SEQUENCE i"' 



;*SUPERVI 



SDPDR0= 

SDPDR1= 

%\)?bR2= 

SDPDR3= 

SDPDR4= 

SDPDft5= 

SLPDR6= 

SDPDR7= 

;*S!IPERVJ 

'oW.m- 1 

SI PARI = 

S\?^H2= 

SJPAR3= 

SIPAR4= 

SIPAR5= 

SIPAR6= 

SIPAR7= 



SIPDR2= 172204 
SIPDR3= 172206 
SIPDR4= 172210 
SIPDR5= 172212 
SIPDR6= 172214 
SIPDR7= 172216 

SOR '!)" PAGE DESCRIPTOR REGISTERS 

72220 

72222 

72224 

72226 

72230 

72232 

72234 

72236 

SOR "I" PAGE ADDRESS REGISTERS 

72240 

722^^2 

722^^ 

722^6 

72250 

72252 

72254 

72256 
;*SUPERVJSOR ^D" PAGE ADDRESS REGISTERS 
SDPARO= 172260 
SDPAR1= 172262 
SDPAR2= 172264 
SDPAR3= 172266 
SDPAR4= 172270 
SDPAR5= 172272 
SDPAR6= 172274 
SDPAR7= 172276 

;*<ERN£L 'T' PAGE DESCRIPTOR REGISTERS 
KIPDRO^ 172300 
»CIPDR1= 172302 
K1P0R2=^ 172304 
KIPDR3= 172306 
KIPDR4= 172310 
K1PDR5= 172312 
K]PDR6= 172314 
K]PDR7= 172316 

;*K£RNEL "D" PAGE DESCRIPTOR REGISTERS 
KDPDR0= 172320 
KPPDRU 172522 
KDPDR2= 172324 
ICDP0R3= 172326 
KDP0R4= 172330 
KDPDR5= 172332 
KDP')R6= 172334 
KDPDR7= 172336 

.-•KERNEL "I" PAGE ADDRESb REGISTERS 
KIPAR0= 172340 
KIPAR1= 172342 
KIPAR2-: 172344 
KIPAR3= 172346 
KIPAR4- 172350 



CKKTBOO 11 /4A MEM MGMT PRT B 
MEMORY MANAGEMENT DEFINITIONS 



MACRO Mil 13 12-JAN-8^ 12:19 PAGE 



F 2 
15-4 



SEQUENCE lb 





172352 




1 72354 




172356 




172360 




172362 




172364 




172366 




172370 




172372 




172374 




172376 


1199 




1200 




1201 


177572 


1202 


177574 


1203 


177576 


1204 


172516 


1205 


000006 


1206 


000006 


1207 


000006 


1208 


000020 


1209 


000100 


1210 


1 77766 


1211 


001100 


1212 


000700 


1213 


000600 


12H 





kIPAR5= 172352 

KIPAR6= 172354 

KIPAR7= 172356 

;*!CEfiNEL "D" PAGE ADDRESS REGISTERS 

KDPARO= 172360 

KDPAR1= 172362 

(CDPAR2= 172364 

KDPAR3= 1^2366 

KDPAR4= 172370 

KDPAR5= 172372 

KDPAR6= 172374 

KDPAR7= 172376 

;*ADDITiONAL DEFINITIONS 

;* 

MMR0=SR0 

MMR1=SR1 

MMR2=SR2 

MMR3=SR3 

KSP=SP 

SSP=SP 

usp-sr 

T0IT^8IT4 

W8IT=BIT6 
CPUERR=1 77766 
KERSTK-^TACK 
SUPSTK^-STACK-200 
USESTKsSTACK-300 



CKKTBDO 11 /AA MEM M6MT PftT B 
TRAP CATCHER 
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1246 



000000 



000174 
00)17A 000000 
000176 000000 

000200 000137 020000 



.SBTTL TRAP CATCHER 

.=0 
;*ALL UNUSED LOCATIONS FROM A - 776 CONTAIN A ".+2, HALT" 
;*SEQUENCE TO CATCH ILLEGAL TRAPS AND INTERRUPTS 
;*L0CATI0N CONTAINS TO CATCH IMPROPERLY LOADED VECTORS 

•=174 
DISPREG: .WORD ;;SOFTWARE DISPLAY REGISTER 

SWREG: .WORD ;;SOFTWARE SWITCH REGISTcR 

.SBTTL STARTING ADDRESS(ES) 

JMP S^START ;;JUMP TO STARTING ADDRESS OF PROGRAM 



SEQUENCE 19 



H 2 
CKKTBDO 11/AA MEM MGMT PRT B MACRO M1113 12-JAN-82 12:19 PAGE 18 SEQUENCE 20 

ACT11 HOOKS 

1247 .S8TTL ACT11 HOOKS 

;HOOKS REQUIRED BY ACT11 

000204 $SVPC=. ;SAVE PC 

000046 .=46 

000046 C56?s:': SENDAD ;;1)SET L0C.46 TO ADDRESS Of SENDAD IN .$EOP 

0000 2 .=.-52 

000052 GOO )0 .WORD ;;2)SEr L0C.52 TO ZERO 

000^04 ,=$SVPC ;; RESTORE PC 



I 



CKKTBDO 11 /4A 
APT PARAMETER 

1248 



MEM MGMT 
BLOCK 



PRT B MACRO Ml 11 3 12-JAN-82 12; 19 PAGE 



I 
19 



SEQUENCE 21 



0000E4 
000044 



00020A 
000204 
000206 
000210 
000212 
0002 H 
000216 



00020A 
000024 
000200 
000044 
000204 
000204 



000000 
00122^ 
000002 
000005 
000005 
000014 



.S8TTL APT PARAMETER BLOCK 
SET LOCATIONS 24 AND 44 AS REQUIRED FOR APT 

;******************************************♦******************** 

.$X=. ;;SAVE CURRENT LOCATION 

.=24 ;;SET POWER FAIL TO POINT TC START OF PROGRAM 

200 ;;FOR APT START UP 

.=4^ ;;POINT TO APT INDIRECT ADDRESS PNTR. 

SAPTHDR ;;POINT TO APT HEADER BLOCK 

.=.$X ;;RESET LOCATION COUNTER 

;***************Ar******************* **************************** 

SETUP APT PARAMETER BLOCK AS DEFINED IN THE APT-PDP11 DIAGNOSTIC 

INTERFACE SPEC. 
$APTHD: 

SHIBTS: .WORD 
SMBADR: .WORD SMAIL 
$TSTM: .WORD 2 
SPASTM: .WORD 5 
SUNITM: .WORD 5 



TWO HIGH BITS OF 18 BIT MAILBOX ADDR. 

ADDRESS OF APT MAILBOX (SrS 0-15) 

RUN TIM OF LONGEST TEST 

RUN TIME IN SECS. OF 1ST PASS ON 1 UNIT (QUICK ^ERIH) 

ADDITIONAL RUN TIME (SECS) OF A PASS FOR EACH ADDITIONAL 



$ETEND-$MAlL/2 ;;LENGTH MAILB0X-ETA6LE (WORDS) 



UNIT 



CKKTBDO 11 /A4 M^M MGMT PRT B 
COMMON TAGS 

1249 
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J 
20 



SEQUEWCE ?.2 



001100 
001100 
001102 
001103 
001104 
001106 
001110 
001112 
001114 
001115 
001116 
G0112D 
001122 
001124 
001126 
001130 
001132 
001134 
001135 
001136 
001140 
001142 
001144 



001100 

000000 

000 

000 

000000 

000000 

000000 

000000 

000 

001 

000000 

000000 

000000 

000000 

000000 

000000 

000000 

000 

000 

000000 

177570 

177570 

177560 



001146 


177562 


001150 


177564 


001152 


177566 


001154 


000 


001155 


002 


001156 


012 


001157 


000 


001160 


UOOOOO 




000006 


001162 


000000 


001164 


000000 


001166 


000000 


001170 


000000 


001172 


000000 


001174 


000000 




000006 


001176 


000000 


00 1200 


000000 


001202 


000000 


oo^20^ 


000000 


001206 


000000 


001210 


000000 


001212 


cooooo 


001214 


207 


001217 


000 


001220 


077 


001221 


015 


001222 


012 



377 



000 



.SBTTL 

• ; ***** 

.--rTHiS 
;*USED 

$CMTA6: 

STSTNM: 

SERFLG: 

$ICNT: 

SLPADR 

SLPCRR 

SERTTL 

SITEMB 

$ERMAX 

SERRPC 

SGDADR 

$BDADR 

SGDDAT 

S8DDAT 



iAUTOS: 
$iNTA6: 

SUR: 

DISPLAY 

STKS: 

$rK8: 

$TPS: 

$TP8: 

SNULL: 

SFJLLS 

SFJLLC 

STPFLG 

$REGAO 



$REG0 
$REG1 
$RE62 
$REG3 
$REG4 
$REG5 
■ REPT 
STMPO 
$TMP1 
$TMP2 
$rMP3 
$T«P4 
$TMP5 
$E SCAPE 
377 $8ELL: 

$OUES: 
$CRlF: 
$LF: 



COMMON TAGS 

*************'C******************************»***ll^***1****^* 

TABLE CONTAINS VARIOUS COMMON STORAGE LOCATIONS 
IN TME PROGRAM. 
.=1100 



.UORD 
.BYTE 
.BYTE 
.WORD 
.WORD 
.WORD 
.WORD 
.BYTE 
.BYTE 
.WORD 
.WORD 
• WORD 
.WORD 
.WORU 
.WORD 
.WORD 
.BYTE 
.BYTE 
.WORD 
.WORD 

.WORD 
177560 
177562 
177564 
177566 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.WORD 

.REPT 

.WORD 

.WORD 

.WORD 

.WORD 

..WORD 

.WORD 

6 

.WORD 

.WORD 

.WORD 

.WORD 

.WORD 

.JORD 



.ASCIZ 








r 





1 





















DSWR 

DDISP 





2 

12 





$CM3 













D 








;;START OF COMMON TAGS 



<207><377><377> 



.ASCII /?/ 
.ASCII <15> 
.ASCIZ <12> 



; CONTAINS 
; CONTAINS 
.-CONTAINS 
; CONTAINS 
.■CONTAINS 
.-CONTAINS 
; CONTAINS 
; CONTAINS 
.•CONTAINS 
.'CONTAINS 
; CONTAINS 
.•CONTAINS 
.■CONTAINS 
.-RESERVED- 

;; AUTOMATIC 
:; INTERRUPT 



THE TEST NUMBER 
ERROR FLAG 

SUBTEST ITERATION COUNT 
SCOPE LOOP ADDRESS 
SCOPE RETURN FOR ERRORS 
TOTAL ERRORS DETECTED 
ITEM CONiPOL BYTE 
MAX. ERRORS PER TEST 
PC OF LAST EKROR INSTRUCTION 
ADDRESS OF 'GL'OD* DATA 
ADDRESS OF 'BA^' DATA 
'GOOD' DATA 
'BAD' DATA 
-NOT TO BE USED 



MODE 
MODE 



INDICATOR 
INDICATOR 



.•ADDRESS OF SWITCH REGISTER 

.'ADDRESS OF DISPLAY REGISTER 

;TTY KBD STATUS 

;TTY KBD BUFFER 

;TTY PRINTER STATUS REG. ADDRESS 

;TTY PRINTER BUFFER REG. ADDRESS 

.•CONTAINS NULL CHARACTER FOR FILLS 

.•CONTAINS if OF FILLER CHARACTERS REQUIRED 

.'INSERT FILL CHARS. AFTER A 'IINE FEED" 

.-"TERMINAL AVAILABLE" FLAG (BIT<07>=0=YES) 

.'CONTAINS THE ADDRESS FROM 

:UHICH (SREGO) WAS OBTAINED 



.'CONTAINS 
.'CONTAINS 
.'CONTAINS 
.'CONTAINS 
.'CONTAINS 
.'CONTAINS 



<($REGAD)+0) 
(($REGAD)i2) 
<($REGAD)+4) 
(($REGAD)*6) 

<(^REGAD)O0) 
(($REGAD)+12) 



.'USER DEFINED 

.•USER DEFINED 

;USER DEFINED 

.'USER DEFINED 

.-USER DEFINED 

;USER DEFINED 

;FSCAPE ON ERROR AHDRESS 

;COD£ FOR BELL 

.'QUESTION MARK 
.-CARRIAGE RETURI^ 
;LINE FEED 















K 2 
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COMMON TAGS 




















; ;***tilrt*«r***«r*ilr***«rilrilr**'***ilri<ir«rilrD[1^4ri^*4rilr<^i«*A4rilr^i^)^*A4ik1kA^i^«*AA**<^ik*1^ 








•S8TTL 


APT MAILBOX-ETABLE 








;;*********rfr*****************************ilf**llf*********-v******l^*«* 








.EVEN 








001 ?24 






SMAIL: 






;APT MAILBOX 


00122A 


000000 




SMSGTY: 


.WORD 


AMSGTY ; 


.-MESSAGE TYPE CODE 


001226 


000000 




SFATAL: 


.WORD 


AFATAL ; 


; FATAL ERROR NUMBER 


0012, . 


000000 




$TESTN: 


.WORD 


ATESTN ; 


;TEST NUMBER 


001232 


oooooc 




$PASS: 


.WORD 


APASS 


;PASS COUNT 


001 23A 


000000 




SDEVCT; 


.WORD 


ADEVCT ; 


; DEVICE COUNT 


001236 


000000 




$UNIT: 


.WORD 


AUNJT 


;I/0 UNIT NUMBER 


0012^0 


000000 




SMSGAD: 


.WORD 


AMSGAD ; 


.-MESSAGE ADDRESS 


001 2^2 


000000 




SMSGLG: 


.WORD 


AMSGLG ; 


.-MESSAGE LENGTH 


001 2AA 






SETABLE 


> 




;APT ENVIRONMENT TABLE 


001 2-;^ 


000 




$ENV: 


.BYTE 


AENV ; 


.-ENVIRONMENT BYTE 


0012^5 


000 




SENVM: 


.BYTE 


AENVM 


.-ENVIRONMENT MODE BITS 


001 2A6 


000000 




SSWREG; 


.WORD 


ASWREG ; 


;APT SWITCH REGISTER 


001250 


000000 




$USWR: 


.WORD 


AUSWR ; 


;USER SWITCHES 


001252 


000000 




SCPUOP; 


.WORD 


ACPUOP ; 


;CPU TYPE, OPTIONS 














BITS 15-11=CPU TYPE 1 
















11/04=01,11/05=02,1 1/20=03 J1/40--=04 J 1/45=05 
















11/70=06. PD0=07.Q=10 














BIT 10=REAL T:^E CLOCK 














BIT 9=FL0ATING POINT PROCESSOR 














BIT 8=MEM0Ry MANAGEMENT 


001254 






SETEND: 
.MEXJT 








001254 


000000 




TESTNO; 


.WORD 





.-HOLDS TE.^T NUMBER F0f( T/PEOUIS 


001256 


000000 




UASR6: 


.WORD 







•USED TO STORE THE STACK POINTER ^FTER A TRAP 1 


001260 


000000 




1RAPPC: 


.WORD 







'USED TO STORE THE PC OF A TRAP OR ABORT 


001262 


000000 




TRAPPS: 


.WORD 







•USED TO STORE THE PS OF A ''RAP OR ABORT 


001264 


000000 




WASSRO: 


.WORD 







•USED TO STORE CONTENTS OF SRO 


001266 


000000 




WASSR1: 


.WORD 







•USED TO STORE CONTENTS OF SRI 


001270 


000000 




WASSR2: 


.WORD 







'USED TO STORE CONTENTS OF SR2 


001272 


000000 




UASSR3: 


.WORD 







•USED TO STORE CONTENTS OF SR3 


001274 


000000 




T8JTPS: 


.WORD 







•SAVES THE PSW THAT MAY HAVE ITS T-BIT ON 


001276 


000000 




V1HT1: 


.WORD 







•HOLDS VIRTUAL ADDRESS TO BE CONVERTED 


001300 


000000 




P8AL0: 


.WORD 







•HOLDS BITS <15:00> OF PHVSICAL ADDRESS 


001302 


000000 




PBAHl : 


.WORD 







HOLDS BITS <21;16> OF PHYSICAL ADDRESS 


001304 


000000 




BAOPC: 


.WORD 







HOLDS PC FROM ABORT OR TRAP 


001306 


000200 




$MXCNT: 


.WORD 


200 




■HOLD MAX. NUMBER OF LOOP ITERATIONS 


001310 


000000 




srejT: 


.WORD 







•'T' BIT STATE INDICATOR 


001312 


136 


103 


015 SCNTLC: 


•A5CJZ 


/*C/<15><12> 


•CONTROL C 


001315 


012 


000 















.EVEN 



CKKIBDO 11 /AA 
ERROR POINTER 



HEM mm 

TA8LE 



1250 

1251 

1252 

1253 

125A 

1255 

1256 

1257 

1258 

1259 

1260 

1261 

1262 

1263 

1264 

1265 

1266 

1267 

1268 

1269 

1270 

1271 

1272 

1273 

1274 

1275 

1276 

1277 

1278 

1279 

1280 



001320 

001320 
001322 
001324 
001326 



001330 
001332 
001534 
001336 



001340 
001342 
001344 
001346 



001350 
00135: 
001354 
001356 



001360 
001362 
001364 
001366 



007522 
012672 
015306 
016057 



007562 
012752 
015324 
016041 



0U7/.31 
01 3042 
015344 
016050 



007701 
013042 
015344 
016050 



C07750 
013102 
015356 
016057 
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SEQUENCE 24 



1281 001370 


010022 


1282 001372 


013162 


1285 001374 


015374 


1284 001376 


016057 


1285 




1286 




1287 001400 


010073 


1288 001402 


013242 


1289 001404 


015412 


1290 001406 


016057 



.SBTTL 
*THIS 
*THE I 
»L0CAT 
*N0TE1 

*N0TE2 

* 



ERROR POINTER TABLE 
TABLE CONTAINS THE INFORMATION FOR EACH ERROR THAT CAN OCCUR. 
NFORMATION IS OBTAINED BY USING THE INDEX NUMBER FOUND IN 
ION ^ITL/'iB. THIS NUMBER INDICATES WHICH ITEM IN THE TABLE IS PERTINENT. 

If SITEMB IS THE ONLY PERTINENT DATA IS (SERRPC). 

EACH ITEM IN THE TABLE CONTAINS 4 POINTERS EXPLAINED AS FOLLOWS: 



SERRTB 
*ITEM 



EM 
DH 
DT 
DF 



1 



EMI 
DH1 
DTI 
DF12 



;*ITEM 2 



EM2 
DH2 
DI2 
DF2 



^"^ITEM 3 



EM1C 
DHIO 
DTIO 
DF3 



;*ITEM 4 



EMU 
DHIO 
DTIO 
DF3 



;*ITEM 5 



EMI 2 
DH12 
DT12 
nFl2 



;*ITEM 6 



EM13 

DH13 

Dn3 

DF12 



*ITEM 7 



EMU 
UH14 
DTU 
DF12 



; POINTS TO THE ERROR MESSAGE 

;POINTS TO THE DATA HEADER 

;POINTS TO THE DATA 

; POINTS TO THE DATA FORMAT 



UNEXPECTED CPU TRAP TO LOC. 004 

OLD PC OLD PSW R6 WAS CPUERR TESTNO ERRORPC 

TRAPPC,TRAPPS,WASR6,CPUERR,TESTNO,$ERPPC,0 

0,0,0,0,0,0 



UNEXPECTED MEM. M6MT. TRAP TO LOC. 250 

01 D PC OLD PSW R6 WAS SRO SR2 TESTNO ERRORPC 

TRAPPC, TRAPPS, WASR6, WASSRO, WASSR2, TESTNO, $ERRPC, 

0.0,0,0,0,0,0 



MEMORY MGMT. ACCESS ABORT DID NOT OCCUR 
PDR 4 PSW TESTNO ERRORPC 
$REG2,$TMP0, TESTNO, SERRPC, 
0,0,0,0 



ACCESS ERROR DID NOT ABORT INSTRUCTION 
PDR 4 PSW TFSTNO ERRORPC 
$RE62,STMP0, TESTNO, SERRPC, 
0,0,0,0 



SRO DID NO! REPORT ACCESS ERROR CORRECTLY 



SRO WAS tXPECTD PDR 4 PSW 



t ESI NO ERRORPC 



WASSR0,$REG3,SREG2,$TMPO, TESTNO, SERRPCO 
0,0,0,0,0,0 



SR2 DID NOT LOCKUP CORRECT VIRTUAL ADDR. 
SR2 WAS EXPECTD POR 4 PSW TESTNO ERRORPC 
WASSR2.SREG4,$REG2,$TMP0, TESTNO, SERRPC, 
0,0,0,0,0,0 



PAGE LGTH. ABORT OCCURRED WHEN IT SHOULDNM HAVE 
V.8.A. KIPDR4 SRO WAS SR2 WAS TESTNO ERRORPC 
SREGO, $REG4, WASSRO, WASSR2, TESTNO. SERRPC, 
0,0,0,0,0,0 



CKKTBDO 11 /A4 HEM MGMT PRT B 
ERROR POINTER TABLE 



1291 

1292 

1293 

129A 

1295 

1296 

1297 

1298 

1299 

1300 

1301 

1302 

1?03 

IbOA 

1305 

1306 

1307 

1308 

1309 

1310 

1311 

1312 

1313 

13U 

1315 

1316 

1317 

1318 

1319 

1320 

1321 

1322 

1323 

132A 

1325 

1326 

1327 

1328 

1329 

1330 

1331 

1332 

1333 

133A 

1335 

1336 

1337 

1338 



001410 
00K12 
OOHU 
00H16 



00U20 
00U22 
00142A 
001426 



001430 
001432 
001434 
001436 



001440 
001442 
001444 
001446 



001450 
001452 

001454 
001456 



001460 
C01462 
001464 
001466 



001470 
001472 
001474 
001476 



001500 
001502 
001504 
C01506 



010154 
013322 
015430 
016050 



^10237 
013362 
015442 
016057 



010022 
013442 
CI 5460 
016057 



010022 
013522 
015476 
016050 



010315 
013562 

015510 
016057 



010362 
013677 
015526 
016050 



010431 
013522 
015476 
016050 



010464 
013737 
015540 
016050 
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;*ITEM 10 

EMI 5 
DH15 
DT15 

DF3 

;*JTEM 11 

EMI 6 
DH16 
DT16 
DF12 

;*ITEM 12 

EM13 
DH17 
DT17 

DF12 

;*JTEM 13 

EMI 3 
DH20 
DT20 
DF3 

;*JTEM 14 

EM21 
DH21 

[ 21 

Dn2 

;*JTEM 15 

EM22 
DH22 
DT22 
DF3 

;*JTEM 16 

EM23 
DH20 
DT20 
DF3 

;*iTEM 17 

EM24 
DH24 
DT24 
DF3 



M 
PAGE 22 



SEQUENCE 25 



PAGE LGTH. ABORT DID NOT OCCUR WHEN IT SHOULD HAVE 
V.8.A. KIPDR4 TESTNO ERRORPC 
$RE60,$REG4.TESTNO.$ERRPC.O 
0,0,0,0 



SRO DID NOT REPORT PAGE LGTH. ABORT CORRECTLY 
V.e^A- KJPDR4 SRO WAS EXPECTD TESTNO ERRORPC 
$RE60,$RE64,WASSR0,$REG2, TESTNO, SERRPCO 
0,0,0,0,0,0 



SR2 DID NOT LOCKUP CORRECT VIRUAL ADDR. 
V.B.A. KIPDR4 SR2 WAS EXPECTD TESTNO ERRORPC 
$RFG0,$RE64,WASSR2,$REG3, TESTNO, $ERRPC,0 
0,0,0,0.0,0 



SR2 DID NOT LOCKUP Cl^RECT VIRUAL ADDR. 
SR2 WAS EXPECTD TESTNO ERRORPC 
WASSR2,$REG1, TESTNO, $ERRPC,0 
0,0,0,0 



SRO OR SR2 CHANGED BY A SECOND ABORT 

FIRST ABORT SECOND ABORT 

SRO WAS SR2 WAS SRO WAS SR2 WAS TESTNO ERRORPC 

$TMP0,$TMP2,WASSR0,WASSR2, TESTNO, lERRPCO 

0,0,0,0,0,0 



SRO OR SR2 WAS NOT "RESET" BY A RESET 
SRO WAS SR2 WAS TESTNO ERRORPC 
WASSR0.WASSR2, TESTNO, $ERRPC,0 
0,0,0,0 



Sf<2 NOT TRACKING CORRECTLY 
SR2 WAS EXPECTD TESTNO ERROPC 
WASSR2.$REG1, TESTNO, lERRPCO 
0,0,0,0 



DID NOT TRAP THRU KERNEL SPACE 
PSW WAS R6 WAS TESTNO ERRORPC 
$REG1,$REG2, TESTNO, $ERRPC,0 
0,0,0,0 



:kkibdo 11 /A4 mem mgmt prt b 
error pointer table 



1339 

1340 

1341 

1342 

1345 

1344 

1345 

1346 

1347 

1348 

1^49 

1350 

1351 

1352 

1353 

1354 

1355 

1356 

1357 

1358 

1359 

1360 

1361 

1362 

1363 

1364 

1365 

1366 

1367 

1368 

1369 

1370 

1371 

1372 

1373 

1374 

1575 

1576 

1577 

1578 

1379 

1580 

1581 

1582 

1583 

1384 

1585 

1566 

1587 

1388 

1589 

1390 

1591 

1592 

1393 

1594 

1595 



001510 
001512 
001514 
001516 



001520 
001522 

001524 
001526 



001550 
001532 



001534 
001536 



001540 
001542 

001544 
001546 



001550 
001552 

001554 
001556 



001560 
001562 
0J1564 
001566 



001570 
001572 
001574 
001576 



001600 
001602 
001604 
001606 



010523 
013522 
015476 
016054 



010570 
013777 

015552 
016057 



010636 
014111 



015570 
016057 



010715 
014306 

015606 
016050 



010756 
014306 

015606 
016050 



011021 
014362 
015620 
016065 



011057 
014401 
015526 
016050 



011135 
014441 
015626 
016034 



001610 011216 
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;*ITEM 20 

EM25 
DH20 
DT20 
DF5 


;*iTEM 


21 
EM26 
DH26 




DT26 
DF12 


;*ITLM 


22 
EM27 
DH27 




DT27 
DF12 


;*JTEM 


?.5 
EM30 
DH30 




DT30 
DF5 


;*iTEM 


24 
EM31 
DH30 




Dr30 
l)F3 


;*JTEM 


25 

EM32 
DH32 
DT32 
DF32 


;*irEM 


26 
EM35 
DH55 
DT22 
DF5 


;*JTEM 


27 
Ert54 
DH34 
DT54 
DFl 


:*IJBM 


50 
EM55 
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SEQUENCE 26 



KT ERROR SERVICED ON ODD ADDR. ERROR 
Pt>R TESTNO ERRORPC 

$REG5.TESTNO,$ERRPC,0 
0,0,0 



SRO OR SR2 CHANGED BY ODD ADDR. ERROR 

EXPECTED RECEIVED 

SRO SR2 SRO WAS SR2 WAS TESTNO ERRORPC 

$REG0,$RE61,WASSR0,WASSR2, TESTNO, SERRPCO 

0,0,0,0,0,0 



ERROR DURING "DOUBLE ERROR" (KT S ODD ADDR.) 

EXPECTED: 

PSW PC SRO SR2 

170017 (5$+4) 020147 (3$) 

RECEIVED 

PSW PC SRO SR2 TESTNO ERRORPC 

$REG1,$KF63,WASSR0,WASSR2, TESTNO, $ERRPC,0 

0,0,0,0 0,0 



;MFkI instruction PUSHED WRONG DATA 

'DATA DATA 

•EXPECTD RECEIVD TESTNO ERRORPC 

;$RE60,$REG1, TESTNO, SERRPCO 

;0, 0,0,0 



MTPl INSTRUCTION LOADED WRONG DATA 

DATA DATA 

EXPECTD RECEIVD TESTNO ERRORPC 

$RE60,$REG1, TESTNO, SERRPCO 

0,0,0,0 



STACK NOT PUSHED BY MFPI-MTPI 
lESTNO ERRORPC 
rESTNO,$ERRPC,0 
0,0 



KEMEL PAGE ACCESSED INSTEAD OF USER: MFPI-MTPI 
SRO WAS SR2 WAS TESb^O ERRORPC 
WASSR0-WASSR2, TESTNO. SERRPCO 
0,0,0,0 



M.M. ABORT IN KfcPNAL D-SF* E HAD WRONG CONDITION 

(MMRO) (MMR1) (W12) "*^0 ERRORPC EXPECTING 020031 

$REG1,$RE62,$RE65,TFS:-M^' :-..'>PPC,0 

0,0.0,0,0 



; ILLEGAL MODE 10 NOT ABOR.-.D 



a 3 

CKKTBOO n/AA MEM MGMT PRT B MACRO Mil 13 12-JAN-82 P--19 PAbi^ 23-1 SEQUENCE 21 

ERROR POINTER TABLE 

1396 001612 0U362 DH32 ;TE..?M; ERRORPC 

139? 0016U 015620 DT32 ;:ci.TNU,$ERRPC,0 

1398 001616 016065 0F32 .0,0 



CKKTBDO 11 /A4 MEM MGMT PRT B 
ERROR POINTER TABLE 



1399 
1A00 
1A01 
1402 
H03 
40A 
V»05 
H06 
H07 
H08 
1409 
1A10 
K11 
U12 
H13 
HU 
U15 
U16 
1417 
1418 
1419 
1420 
1421 
1422 
1423 
1424 
1425 
1426 
1427 
1428 
1429 
1430 
1431 
1432 
1433 
1434 
1435 
1436 
1437 
1438 
1439 
1440 
1441 
1442 
1443 
1444 
1445 
1446 
U<7 

VhS 
1440 

1450 
1451 
1452 
1453 



001620 
001622 
001624 
001626 



001630 
001632 
001634 
001636 



001640 
001642 
001644 
001646 



001650 
001652 

001654 
001656 



001660 
001662 
001664 
001666 



001670 
001672 
001674 
001676 



001700 
001702 

001704 
001706 



001710 
001712 
001714 
001716 



001720 
001722 
001724 
001726 



11252 
014532 
015642 
016050 



011327 
014572 
015540 
016050 



011372 
014632 
015654 
016054 



011457 
014703 

015664 
016034 



011523 
015007 
015700 
016050 



011566 
015047 
015712 
016034 



011633 
014306 

015606 
016050 



011566 
015047 
015726 
016034 



011701 
014362 
015620 
016041 
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;*ITEM 31 

EH36 
DH36 
DT36 
DF3 


;*iTEM 


32 
EM3? 
DH37 
DT2^ 
DF3 


;*ITEM 


33 
EiM40 
DH40 
DT40 
DF5 


;*JTEM 34 

EM41 
DH41 




Dr41 
DF1 


;*jrEM 


35 
EM42 
DH42 
DT42 
DF3 


;*JT£M 


36 
EM43 
DH43 
DT43 
DF1 


;*irEM 


57 
EM44 
DH30 




DT30 
DF3 


;*JTEM 


40 
EM43 
DH43 
DT45 
DF1 


;xJTEM 41 

EM45 
DH32 
0J52 
DF2 



C 3 
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SEQUENCE 28 



SRO DJD NOT REPORT ILLEGAL MODE 10 CORRECTLY 
SRO WAS EXPECTD TESTNO ERRORPC 
WASSR0.$REG1,TESTNO,$ERftPC.O 
0,0,0,0 



PSW CHANGED GY AN RTJ IN USER MODE 
. ^«;W WAS EXPECTD TESTNO ERRORPC 
;iRE61,$RE62, TESTNO, $ERRPC,0 
;0, 0,0,0 



ABORT IN KERNAL D-SFACE PICKED UP VECTOR FROM I-SPACE 
(PSW) TESTNO EHRORpr EXPECTING XXX340 
$REG0, TESTNO, $ERRPC,0 
0,0,0 



D SPACE ENABLE CIRCUHRy HAS FAILED 

ERROR AUTOl/D VIRTUAL 

REGISTR 'EGISTR ADDRESS TESTNO PC AT ABORT 

WASSR0,WASSR1,WASSR2, TESTNO, BADPC.O 

0,0,0,0,0 



INCORRECT STORE BY MTP INSTRUCTION 
GDDATA STORED TESTNO ERRORPC 
$RE63,$RE64, TESTNO, SERRPCO 
0,0,0,0 



TRIED TO REFERENCE NON-RESIDENT PAGE 
(MMRO) (MMRl ) (MMR2) TESTNO ERRORPC 
$RE60,$RE61 ,$REG2, TESTNO, $ERRPC,0 



WRONG DATA FETCHED BY MFP INSTRUCTION 

DATA DATA 

EXPECTD RECEIVD TESTNO ERRORPC 

$R£G0,$REG1, TESTNO, SERRPCO 

0,0,0,0 



TRIED TO REFERENCE NON-RESIDENT PAGE 
(MMRO) (MMRD (MMR2) TESTNO ERRORS C 
WA3SR0-WASSR1,WASSR2, TESTNO, SERRPCO 
0,0,0,0.0 



ILLEGAL CSM DID NOT TRAP TO 10 
TESTNO ERRURPC 
TESTNO, SERRPCO 
0,0 



L. 



CKKTBDO n/As MEM MGMT PRT B 
ERROR POINTER TABLE 
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SEQUENCE 29 



1A5A 

U55 

1456 

1A57 

H58 

H59 

H60 

U61 

U62 

1A63 

1A6A 

H65 

1A66 

H67 

1468 

1A69 

U70 

1A71 

U72 

U73 

U7A 

1A75 

1476 

1477 

1478 

1479 

1480 

1481 

1482 

1483 

1484 

1485 

1486 

1487 

1488 

1489 

1490 

1491 

1492 

1493 

1494 

1495 

1496 

1497 

1498 

1499 

1500 

1501 

1502 

1503 

1504 

1505 

1506 

1507 

1508 

1509 



001730 
001732 
001734 
001736 



001740 
001742 
001744 
001746 



001750 
001752 

001754 
001756 



001/60 
001762 

001764 
001 766 



001770 
001772 

001774 
001776 



002000 
002002 
002004 
002006 



002010 
002012 
002014 
002016 



002020 
002022 
002024 
002026 



002030 
002032 
002034 
002036 



011740 
015117 
015742 
016034 



012002 
015117 
015742 
016034 



012041 
014306 

015606 
016034 



012070 
014306 

015754 
016034 



012126 
014306 

015766 
016034 



012152 
015117 
016000 
016050 



012217 
014362 
015620 
016054 



012263 
014362 
015620 
016054 



012327 
015207 
016010 
016050 



;*JTEM 



;*JTEH 



;*JTEM 



;*ITEM 



;*1TEM 



;*jrEM 



;*ITEM 



;*JTE« 



;*iTEM 



42 
EM46 
DH44 
DT46 
DF1 

43 
EM'i? 
DH44 
DT46 
DPI 

44 
EM50 
DH30 

DT30 
0F1 

45 
EM51 
DH30 

DT47 
DF1 

46 
EM52 
DH30 

DT50 
DF1 

47 
EM53 
nH44 
DT52 
DF3 

50 
EM54 
DH32 
DT32 
DF5 

51 
EM55 
DH32 
DT32 
DF5 

52 
EM56 

DH55 
DT55 
0F3 



CSM DID NOT ENTER SUPERVISOR MODE 
EXPECTD (PSW) TESTNO ERR PC 
$REG3,ACSMPS,TESTNO,$ERRPC.O 
0.0,0,0.0 



CSM SET UP WRONG PREVIOUS MODE 
EXPECTD (PSW) TESfNO ERR PC 
$RE63.ACSMPS, TESTNO, $£RRPC,0 
0,0,0.0,0 



CSM SET UP STACK WRONG 

DATA DATA 

EXPECTD RECEIVD TESTNO ERR PC 

ACSMSP,$TMPO, TESTNO, $ERRPC,0 

0.0.0,0,0 



CSM PUSHED INCORRECT ARGUMENT 

DATA DATA 

EXPECTD RECEIVD TESTNO ERR PC 

SREGO.CSMIST, TESTNO, SERRPC.O 

0,0.0.0.0 



CSM PUSHED WRONG PC 

DATA DATA 

EXPECTD RECEIVD TESTNO ERR PC 

$TMP0.CSM2ND. TESTNO. SERRPC.O 

0,0,0.0.0 



CSM DID NOT CLEAR OLD P5W BITS <3:0> 
OLDPSW TESTNO ERR PC 
CSM3RD. TESTNO. StRRPC.O 
0.0,0.0 



CSM ACCESSED WRONG SUPERVISOR SPACE 
TESTNO ERR PC 
TESTNO, SERRPC.O 
0.0.0 



CSM ABORTED WHEN IT SHOULD NOT HAVE 
TESTNO ERR PC 
TESTNO. SERRPC.O 
0.0.0 



rSM FAILED TO JNCREMrNf/DLCREMCNT REGISTER PROPERLY 
TESTNO CRR PC RO rxP RO RCV 
TESTNO-$ERRPC,$TMPO,$REG0.O 
0.0.0.0 






r.KKTBDO n/4A 
cRROR POINTER 



MEM MGMT 
TABLE 
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26 



StOUtNCE 50 



1510 
1511 
1512 
1513 
15U 
1515 
1516 
1517 
1518 
1519 
1520 
1521 
1522 



0020AO 
002042 
0020AA 
0020A6 



012413 
015246 
016022 
016050 



;*ITEM 



002050 012466 



;*JTEM 



002052 
002054 
002056 



013522 
015476 
016050 



53 

EM57 
DH57 
DT57 
DF3 

54 
EM58 



DH20 
DT?0 
DF3 



;CSM FAILED TO PUT PROPER ARGUMENT ON STACK 
;TESTNO ERR PC AR6EXP ARGRCV 
;TESTNO,$ERRPC.$TMP1,$TMP2,0 
;0, 0,0,0 



SR2 LOCKED UP AN 11/34 COMPATIBLE ADDRESS THAT 
DOES NOT MAKE 11 COMPATIBLE WITH AN 11/70 SINCi 
THE OPTIONAL M7095 ECO #8 IS MISSING 
SR2 WAS EXPECTD TESTNO ERRORPC 

.WASSR2,$RE61 ,TESTNO,$ERRPC,0 

;0, 0,0,0 



012700 077406 



CKKTBDO n/4A MEM MGMT PRT B 
ERROR PO'NTER TABLE 



1523 
1524 
1525 
1526 
1527 
1528 
1529 
1550 
1531 

1532 002060 

1533 002060 
1534 

1535 002064 
1556 002070 

1537 002074 

1538 002076 

1539 002100 
15^0 002104 

1541 0O?106 

1542 002112 

1543 002114 

1544 002120 

1545 002122 

1546 002126 

1547 002130 

1548 002134 

1549 002140 

1550 002144 

1551 002146 

1552 002150 

1553 002152 

1554 002156 

1555 002160 

1556 002164 

1557 002170 

1558 002174 

1559 002176 

1560 002202 

1561 002206 

1562 002210 

1563 002214 

1564 002216 

1565 002220 

1566 00222^ 

1567 002230 



F 3 



012702 
012701 
010022 
077102 
020227 
001003 
012702 
000766 
020227 
001003 
012702 
000760 
012701 
012702 
012703 
00500(^ 
010; i 
010v^2 
062700 
077305 
012711 
012712 
020127 
001005 
Ci?701 
012702 
000754 
020127 
001401 
000207 
012701 
012702 
000743 
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.SBTTL INiTIALIZE ALL PAR'S AND PDR'S 

;* ***** SUBROUTINES UNIQUE TO THIS PROGRAM ***** 



SEQUL'A!Ct 31 



172300 
000020 



172340 

172200 

172240 

177600 

172340 
172360 
000007 

000200 

177600 
1 77600 
172356 

172?40 
17c: 60 

172256 



177640 
1 77660 



• * 

> 

;* 

;* 



THIS ROUTINE WILL INITIALIZE ALL KERNAL, SUPERVISOR, AND 
USER PAR'S AND PDR'S TO THEIR USUAL INITIAL VALUE 



APR I NIT 



U: 
2$: 



3$: 

4$ 

6$ 



7$: 
8$: 



MOV ^77406, RO 

MOV *KIPDR0.R2 

MOV #20, Rl 

MOV RO, (R2)+ 

SOB R1,2$ 

CMP R2.^KDPDR7t2 

BNE 3$ 

MOV #SIPDR0,R2 

BR 1$ 

CMP r2,#*;dpdr7+2 

BNE 4S 

MOV #UIPDR0,R2 

BR 1$ 

MOV #KIPAR0,R1 

MOV *KDPAR0,R2 

MOV M7,R5 

CLR RO 

MOV R0,(R1)* 

MOV ROe (R2)+ 

ADD #200. RO 

SOB R3,6$ 

MOV #177600, (R1) 

MOV #177600, (R2) 

CMP R1,*KIPAR7 

BNE 7$ 

MOV #SIPAR0,R1 

MOV #SDPAR0,R2 

BR 5$ 

CMP RK#SIPAR7 

BEO 8$ 

RTS PC 

MOV #UIPAR0,R1 

MOV #UDPAR0,R2 

BR 5$ 



MAKE ALL PDR'S 4K, READ/WRITE, UPWARDS 

EXPANDING, 200 BLOCKS 

LOAD THE ADDRESS OF THE FIRST KLRNAL PDR 

LOAD Rl WITH 16 

LOAD EACH PDR IN TURN 

LOOP UNTIL ALL ARE LOADED 

HAVE WE LOADED ALL KER\AL PDR*S 

BRANCH If KERNAL I SUPER HAVE BEtN LOAOtD 

LOAD ALL SUPERVISOR PDR'S 

BRANCH TO LOOP 

HAVE USER PDR'S BEEN DUNE 

BRANCH IF THEV HAVE 

LOAD ALL USER PDR'S 

BRANCH TO LOOP 

LOAD Rl WiTH ADDRESS OF KIPARO 

LOAD R2 WITH ADDRESS OF KOPARO 

LOAD LOOP COUNTER WITH 7 

CLEAR PAR VALUE REGISTER 

LOAD AN I -SPACE PAR 

LOAD A D-SPACE PAR 

INCREASE THE PAR VALUE BY 200 

LOOP UNTIL 7 PAR'S ARE LOADED 

MAP I "SPACE PAR7 TO I/O PAGt 

MAP D-SPACE PAR7 TO I/O PAGE 



.-BRANCH TO USER LOAD ROUTINE 
;RETURN TO CALLING ROUTINE 



CKKTBDO 
D-SPACE 

1568 
1569 
1570 
1571 
1572 
1573 
157A 
1575 
1576 
1577 
1578 
1579 
1580 
1581 
1582 
1583 
158A 
1585 
1586 
1587 
1588 
1589 
1590 
1591 
1592 
1593 
1594 
1595 
1596 
1597 
1598 
1599 
1600 
1601 
1602 
1603 
160A 
1605 
1606 
1607 



11/4A MEM MGMT PRT B MACRO 
TESTS MEMORY MANAGEMENT ABORT 



M1113 12-JAN-82 12:19 PAGE 
SERVICE ROUTINE 



G 
28 



SEQUEN'^E yd 



002232 

002232 
002240 
002242 
002244 
002246 



002250 
002254 
002260 
002264 
002272 
002300 
002306 
002312 
002314 
002316 
002320 
002322 
002330 
002336 
002342 
002346 
002354 



042737 
005227 
M7777 
001401 
000000 



01:637 
012637 
012637 
013737 
013737 
013737 
005737 
100002 
104034 
000401 
104002 
042737 
012737 
013746 
013746 
052737 
000006 



SBTTL D'SPACE TESiS MEMORY MANAGEMENT ABORT SERVICE ROUTINE 

THIS ROUTINE WILL BE ENTERED IF A MEMORY MANAGEMENT ABORT OCCURS 
DURING THE D-SPACE ENABLE TESTS. IF THE ABORT IS A NON-RESIDENT 
ABORT, THE PROBLEM IS PROBABLY IN THE D-SPACE ENABLE LOGIC. IN 
ALL OF THE D-SPACE ENABLE TESTS, D-SPACE PAGES 1 » 3 ARE MAPPED 
NON-RESIDENT AND I-SPACE PAGE 3 IS MAPPED NON-RESIDENT. ALL 
OTHER PAGES ARE MAPPED RESIDENT, 4K, READ/WRITE. THEREFORE, If 
THE NON-RESIDENT PAGE IS 1 OR 3 YOU ARE NOT FORCING I-SPACE WHEN 
YOU SHOULD. IF THE NON-RESIDENT PAGE IS 3. AND YOU ARE IN TEST 
15, YOU ARE PROBABLY FORCING I-SPACE WHEN YOU SHOULD BE ALLOWING 
D-SPACE. 



000004 172516 



NODSPAC: 

SIC 
INC 

NDFLAG: -WORD 
BEQ 
HALT 



001304 
001260 
001262 
177572 
177574 
177576 
001264 



177376 
A77777 
001262 
001260 
000004 



10$: 



001264 
001266 
001270 



177572 
002242 



1.2516 



U: 
2$: 



MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
TST 
BPL 

BR 

ERROR 

81 C 

MOV 

MOV 

MOV 

BIS 

RIT 



^8IT2,MMR3 
(PC) + 
-1 
10$ 



(KSP) ,BADPC 

(KSP)+, TRAPPC 

(KSP)+,TRAPPS 

MMR0,WASSR0 

MMRI-WASrRI 

MMfl2,WASSR2 

WASSRO 

U 

+34 

2$ 

+2 

Jtfl 77376. MMRO 

*-1 .NDFLAG 

TRAPPS.-(KSP) 

TRAPPC,-(KSP) 

#8IT2,MMR3 



STARTING ADDRESS FOR ABORT SERVICE ROUTINE 

TURN OFF D-SPACE BEFORE DOING ROUTINE 

MAKE FLAG ZERO If THE FIRST TIME 

FLAG SHOULD BE -1 

BRANCH IF FIRST TIME IN ROUTINE 

I HAVE ENTERED THIS ROUTINE BEFORE 

THE FIRST ERROR IS REPORTED; THE SECOND 

ENTRY ADDRESS IS ON THE STACK. AND THE 

FIRST ERROR CONDITION IS PROBABLY STiLL 

LOCKED UP. 

SAVE PC AT TIME OF ABORT OR TRAP 

SAVE RETURN ADDRESS IH CASE OF LOOP 

SAVE OLD PSW IN CASE OF LOOP 

SAVE STATUS REGISTER 

SAVE AUTO INCR/DECR REGISTER 

SAVE VIRTUAL ADDRESS REGISTER 

WAS ABORT NON-RESIDENT? 

BRANCH U ABORT NOT EXPECTED 

D-SPACE ENABLE FAULTY 

BRANCH TO EXIT 

UNEXPECTED M.M. ABORT 

CLEAR ALL BITS EXCEPT AND 8 

MOVE A -1 TO THE FLAG 

PUSH OLD PSW ONTO STACK 

PUSH OLD PC ONTO STACK 

TURN D-SPACE BACK ON 

RETURN TO MAIN PROGRAM 



r 



CKKTBDO 11 /AA MEM MGMT PRT B MACRO 
TURN OFF T-BIT AND SAVE CURRENT PSW 



1608 
1609 
1610 
1611 
1612 
1613 
16K 
1615 
1616 

1617 C02356 033727 

1618 002364 O0U11 

1619 002366 0137A6 

1620 002372 011637 
1621 

1622 002376 0A2716 

1623 002A02 0127A6 
162A 002A06 000006 
162b 002A10 000207 
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SEQUENCI: 33 



000020 
002410 



.S8TTL TURN OFF T-8IT AND SAVE CURRENT PSW 

* 

* THIS SUBROUTINE IS USED TO TURN OFF THE TRACE TRAP BIT IN 

* THE PSW IF IT IS ON. THE PROCESSOR STATUS IS SAVED IN 

* 



"TBITPS'* SO THAT THE PSW CAN BE RESTORED TO ITS PHEVIOUS 
CONDITION WHEN CONDITIONS WARRANT T-BJT TRAPPING. 



177776 OOOOL'O TOFF: 

177776 

001274 



1$: 



BIT 
BEQ 
MOV 
MOV 

BIC 
MOV 
RTT 
RTS 



PSW.yyTBIT 

PSW.-CSP) 
(SPJjBITPS 

^T5IT,(SP) 
jV1$,-(SP) 

PC 



jS the T-BIT set in THE PSW? 

EXIT ly NO 

PUSH PRESENT hSW ON THE STACK 

ALSO SAVE IT IN "T8ITPS" FOR 

RESTORING LATER 

CLEAR THE T-BIT (BIT 4) IN THE PSW 

PUSH PC OF "RTS*' ON STACK 

"RETURN" TO 1$ WITH T-BIT O'F 

RETURN TO PROGRAM 



CKKTBDO 
TURN ON 

1626 
1627 
1628 
1629 
1630 
1631 
1652 
1633 
1634 
1635 
1636 
1637 
1638 
1639 
16A0 



11/A4 MEM MGMT PRT B MACRO M1113 
T-BIT AND RESTORE PREVIOUS PSW 
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I 

30 



SFQUENCE 34 



00241? 
002A2O 
002A22 
002426 
00243A 
002AA0 
002AA2 



033727 
00U10 
0137A6 
012737 
012746 
000006 
000207 



001274 
000340 
002442 



001274 



.S8TTL TURN ON T-8IT AND RESTORE PREVIOUS PSW 

;*ttt*t**»****t************<r«*«H***H;»**»»***»*mir ***************** 



THIS SUBROUTINE IS USED TO RESTORE THE 
TO ITS PREVIOUS CONDITION BY RESTORING 
SAVED BY THE *'TOFF" SUBROUTINE IN THE * 



PROCESSOR STATUS 
THE "T-BIT PSW* 
73ITPS'' LOCATION. 



001274 000020 TON: 



*********************************************************** **ik* 



1$; 



BIT 
BEQ 
MOV 
MOV 
MOV 
RT1 
RTS 



T8ITPS,A'TB1T 

ii 
t8i:ps.-(sp) 

;lf340,TBITPS 
#1$,~(SP) 

PC 



WAS T-BIT ON IN THE PREVIOUS PSW? 
EXIT If NO 

PUSH PREVIOUS PSW ON THE STACK 
RESET \HE "T8ITPS" LOCATION 
PUSH PC OF "RTS" ON STACK 
"RETURN** TO 1$ WITH T-BIT RESTORED 
RETURN TO PROGRAM 



CKKT8D0 n/AA 
SUBROUTINE TO 

16A1 
16A2 
16A3 
16AA 
16A5 
16A6 
16A7 
16A8 
16A9 
1650 
1651 
1652 



MEM MGMT PRT B 
PREPARE ERLOOP, 



MACRO Mil 13 
THE STACK AN*^ 



12-JAN-82 12:19 
TO ERROR 



PAGE 



31 



^^If 



SEQUENCE 



•J 



1653 

1654 
1655 
1656 
1657 
1658 



0024AA 
002AA6 
00245A 
002A56 
002462 



005726 
012737 
011646 
162716 
000207 



.S8TTL SUSROl'TINE TO PREPARE ERLOOP, THE STACK AND EXJT TO ERROR 

THIS SU8R0UTINF IS USED BV THE THREE SUBROUTINES HFPITS. HTPITS AND 
MFPDTS mm AN ERROR IS CALLED. THE RETURN ADDRESS IS ?^9Pl{i AS 
RETURN IS NOT BACK TO THE SUBROUTINE, BUT TO THE TEST ERROR CALL. THIS 
ROUTINE SETS LOCATION CRLOOP. DUPLICATES THE RETURN ADDRESS ON THE 
STACK FOR POSSIBLE LOOP ON ERROR, AND CORRECTS THE RETURN ADDRESS TO 
POINT TO THE ERROR CALL 4 LOCATIONS BACK FROM THE "TEST PASSED" LOCA- 
TION DUPLICATED. NOTE THE "TEST PASSED" RETURN ON THE STACK IS NOT 
TOUCHED FOR PROBABLE LATER USE WHEN LOOPING IS NO LONGER ENABLED. 



000001 
000004 



0026^^4 



ERPREP: ^%^ (SP)+ 

MOV ^I.ERLOOP 

MOV (SP), -(SP) 

SUB *4,<SP) 

RTS PC 



POP RETURN OF THIS ROUTINE - NOT USED 

SET ERROR LOOPING FLAG INDICATING AN ERROR 

DUPLICATE RETURN ?Z AND 

FUDGE FOR ERROR RETURN 

RETURN TO THE ERROR CALL IH THE TEST 



- r 



CKKTBOO n/A4 
SUBROUTINE TO 



MEM MGMT PRY B MACRO 
TEST MFPI INSTRUCTION 
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3 



SEQUENCE 36 



1659 

1660 

U61 

1662 

1663 

166A 

1665 

1666 

1667 

1668 

1669 

1670 

1671 

1672 

1673 

167A 

1675 

1676 002A6A 005037 00262-; 

16?7 002470 011605 

1678 002472 012537 0C2532 

1679 002476 012537 002534 

1680 002502 062716 000010 

1681 002506 010637 001176 

1682 002512 011637 001200 

1683 002516 012737 

1684 0C2520 000000 

1685 002522 ^7:'/76 

1686 002524 017737 000072 

1687 002532 000000 000000 

1688 C02536 012737 016142 

1689 002544 012601 

1690 002546 020001 

1691 002550 001411 

1692 002552 012737 000340 

1693 002560 013706 001176 

1694 002564 013716 001200 

1695 002570 004737 002444 
1696 

1697 002574 00573/' 002624 

1698 002600 001346 

1699 002602 012737 000340 

1700 002610 013706 001176 

1701 002614 0l5/'!6 001200 

1702 002620 00020/ 

1703 002622 000000 

1704 002624 000090 



.SBTTL SU8R0UTINP TO TEST MFPJ INSTRUCTION 

**********iir***ilf***itr*ir*****^ilr*'ir********* *********** ************* 

USAGE OF THE SUBROUTINE BELOW IS AS FOLLOWS: 



MOV #MFPILP.$LPERR 

MOV #(NU«6),ttFPIPS 

MOV #TRAPRTN.MFPIVC 

MOV #(NU«e),R2 
ill iS ASSUMED THAT ALL PDR 

JSR PCMFPITS 

MFPI (MODE) 
NOP 

ERROR +(NU«B) 

TST (SP)+ 



000250 
000250 



177776 



MFPI LP : 
ffif PIPS: 



MFPJLD: 



177776 



*********** 

HFP.ITS: CLR 
MOV 
MOV 
MOV 
ADD 
MOV 
MOV 
MOV 
.WORD 
.WORD 
MOV 
.WORD 
MOV 
hOV 

chp 

BEO 
MOV 
MOV 
MOV 
JSR 
TIGHTER 
TST 
BNE 
MOV 
MOV 
MOV 
RTS 
.WORD 
.WORD 



;rOR 
1$: 



MrPIVC: 
ERLOOP: 



********:*********** 

ERLOO^' 
(SP), R5 
(R5)+,MFPILD 
(R5)+,MFPILD+2 
*10,(SP) 

spJtmpo 

(SP).$TMP1 
(PC)+.a(PC)+ 


PSW 

aMFPIVCMMVEC 
0,0 

^M6M£RR,M>1VEC 
(SP)+.R1 
R0,R1 
1$ 

#340, PSW 
$TMP0,SP 
$TrtPl,(SP) 
PC.ERPREP 
SCOPE LOOP, REPLACE 
ERLOCP 
MFPILP 
#340,PSW 
$TMPO,SP 
$TMP1.(i>P) 
PC 





;PUT ADDRESS OF LOOPING LOCATION IN SLPERR 

;PUT PS PREVIOUS/CURRENT MODE VALUE IN THIS LOCATION 

;LOAD THE TEST EXCLUSIVE TRAP ROUTINE TO MFPIVC 

•SETUP ADDRESS IN R2 

^S/PAR'S WILL ALSO BE SET UP PROPERLY) 

GO DO THE TEST 

MFPI INSTRUCTION TO TEST IS PUT HERE 

NEEDED FOR MODES 1,2,4, g 5 *ONLY* 

RE 1 URN IS HERE FOR ERROR CALLS 

POP STACK - EXTRA RETURN INSTALLED BY SUBRTN NOT NEEDED 

********* :-nt**************^******* 

CLEAR ERROR LOOPING FLAG 

MOVE STAC< POINTER TO R5 FOR SUBROUTINE LOADING 
MOVE MFP: INSTRUCTION TO LOCATION 
MOVE WFXT WORD TO LOCATION 
FUDofc RETURN TO "TEST PASSED" LOCATION 
SAVE THE STACK POINTER AND 
SAVE THE RETURN ADDRESS 

SETUP PSW AS DEFINED BY LOADFD VALUE IN PRVMD1 
LOCATION TO HOLD SUPER/USER PREVIOUS MODE 
LOAD JH^ PSW 

SET M.M. VECTOR TO MFPIVl 

LOCATIONS TO HOLD MFPI INSTRUCTION UNDER TEST 
SET M.M. VECTOR TO NORMAL ROUTINE 
POP SUPERVISOR/USER/KERNEL STACK INTO R1 
WAS DATA FETCHED SAME AS STORED 
BRANCH IF CORRECT DATA WAS FETCHED 
GO TO KERNEL MODt 
RESET SP 

RESET RETURN ADDRESS 

60 PREPARE LOCATION ERLOOP. RF TURN PC £ EXIT TO ERROR 
•JSR PC, EPPREP" WITH *BR MFPILP" = 000767 
CHECK TO SEE IF THIS "MASSED" IS IN AN ERROR LOOP 
BRANCH BACK IF SO 
GET BACK TO KERNEL MODE 
RESET SP 

RESET RETURN ADDRESS 
EXIT - TEST PASSED 

LOCATION fO HOLD ADDRESS OF MM TRAP CATCHER 
LOCATION USED TO FLAG m ERROR CONDITION 



CKKTBDO 1VA4 
SUBROUTINE TO 



hEM MGMT PRT 3 
CHECK THE MTP.I 



INo 



MACnO Mni3 
^TRUCTION 



12-JAN-82 12:19 



L 3 

PAGE 33 



-.... 



SEQUF.^JCE 37 



1705 
1706 
1707 
1708 
1709 
1710 
1711 
1712 
1713 
"/H 
1715 

in6 

1717 
1718 
1719 
1720 
1721 

1722 002626 005037 002624 

1723 002632 011605 

172A 00263A 012537 002676 

1725 C02640 012537 002r00 

1726 00264A 012537 002720 

1727 002650 062716 000012 

1728 002654 012737 

1729 002656 000000 

1730 002660 milt 

1731 002662 010046 

1732 002664 10503/ 1723^0 

1733 002670 017737 000050 
V34 002676 000000 000000 

1735 002702 012737 016142 

1736 002710 112737 000006 

1737 002716 062702 

1738 002720 000000 

1739 002722 011201 

1740 002724 020001 

1741 002726 001402 

1742 002730 004737 002444 
1743 

1744 00273A 005737 002624 

1745 002740 0013^-5 

1746 002742 000207 

1747 002744 COOOOO 



.SBTTL SUBROUTINE TO CHECK THE MTPI INSTRUCTION 

***AiV**ArA ********************************** Kilr**Hr************it** 

USAGE OF THE SUBRUJTINE BEIOW IS AS FOLLOWS: 



MOV #MTPaF',$LPERR 

MOV #(NUMB),MrPIPS 

MOV #TRAPRTN,MTPIVC 

MOV *(NU«B).R2 

(IT iS ASSUMED THAT ALL PDR 
JSR PC.MTPITS 



MTPI 
NOP 
ERROR 
TST 



000250 

000250 
172310 



• *********** 


MTPITS: 


CLR 




MOV 




MOV 




MOV 




MOV 




ADD 


MTPILP: 


MOV 


MTPIPM: 


.WORD 




.WORD 




MOV 




CLR6 




MOV 


MTPILD: 


.WORD 




MOV 




Move 




ADO 


MTPITA: 


.WORD 




MOV 




CMP 




BEQ 




JSR 


;rOR TIGHTER 


1$: 


TST 




BNE 




RTS 


MTPIVC: 


.WORD 



(MODE) 

+(NUM8) 
CSP) + 

******************* 

ERLOOP 
(SP), R5 
(R5)-f, MTPILD 
(P.^) + ,MTPILD+2 
(R5) + ,MTPnA 
.*12,(SP) 

(PC)+, a(pc)+ 



PSW 

RC,-(KSP) 

KIPDR4 

aMTPIVCMMVEC 

0.0 

*M6MERR.«MVEC 

/*'006,KIPDR4 

(PC)+.R2 



(R2),R1 

RCRl 

1$ 

ERROR LOOP, REPLACE 
ERLOOP 
MFPILP 

PC 




;PUT ADDRESS OF LOOPING LOCATION IN $LPERR 

;PUT PS PREVIOUS/CURRENT MODE VALUE IN THIS LOCATION 

;LOAD THE TEST EXCLUSIVE TRAP ROUTINE TO MTPIVC 

: SETUP ADDRESS IN R2 

^S/PAR'S WILL ALSU BE SET UP PROPERLY) 

GO DO THE TEST 

MTPI INv^TRUCTION TO TEST l^ PUT HERE 

NFEDED FOR MODES 1,2,4, % 5 *ONLY* 

RETURN 1% HERE FOR ^P''')k CALLS 

POP STACK - EXTRA RET >H 'NSTALLED BY SU8RTN NOT NEEDED 



************** i'**«rA**WN 



K**** 



CLEAR ERROR LOOPING FLAL 

MOVE STACK POINTER TO R5 FOR LOADING 

MOVE MTPI TO LOCATION 

MOVE NEXT WORD TO LOCAlJON 

MOVE NUMBER TO ADD TO R2 TO LOCATION 

FUDGE RETURN TO "TEST PASSED" LOCATION 

MAKE PREVIOUS MODE USER/SUPERVISOR 

LOCATION TO HOLD PREVIOUS MODE USER OR SUPER 

LOAD THE PSW 

PUSH TEST DATA ON KERNEL STACK 

MAKE KERNEL I PAGE 4 NON-RESIPENT 

SET MM TO VECTOR IN MTPIVC 

LOCATIONS USED TO PLACE THE MPTI INSTRUCTION 

RESTORE MM VECTOR TO NORMAL ROUTINE 

MAKE KERNEL PAGE 4 RESIDENT 

ADD NUMBER TO R2 TO UNDO INCRE^^i:NT/DECREMENT 

LOCATION TO HOLD -2, 0- +2 OR 100000 

READ FROM ADDRESS 60000 

SEE IF DATA WAS STORED AT CORRECT PLACE 

BRANCH \} IT WAS 

60 PREPARE LOCATION ERLOOP, RETURN PC & EXIT TO ERROR 

"JSR PCERPREP" WITH 'BR MTPILP" = 000754 

SEE IF THIS "PASSED" WAS IN AN ERROR LOOP 

BRANCH BACK IF SO 

ly^U - TEST PASSED 

LOCATION TO HOLD MM VECTOR TO LOAD 



CKKTBOO 11 /A-; 
SUBROUTINE TO 

1748 
1749 
1750 
1751 
1752 
1753 
1754 
1755 
1756 
1757 
1758 
1759 
1760 
1761 
1762 
1763 
1764 

1765 002746 

1766 002752 

1767 002754 

1768 002760 

1769 002764 

1770 002770 

1771 002772 

1772 002774 

1773 002776 

1774 003004 

1775 003010 

1776 003016 

1777 003020 

1778 003022 

1779 003024 

1780 003030 

1781 003034 

1782 003036 

1783 003040 



MEM MGMT PRT B 
CHECK THE MFPD 



MACRO Mil 13 
INSTRUCTION 
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SEQUENCE 38 



005037 
011605 
012537 
012537 
062716 
012737 
000000 
177776 
017737 
000000 
012737 
012601 
020001 
001402 
004737 
005737 
001355 
000207 
OOOOUU 



002624 

003004 
003006 
000010 



000036 
000000 
016142 



002444 
002624 



.S8TTL SUBROUTINE TO CHECK THE MFPD INSTRUCTION 

ilr*******!^ ****** ************************************************ 



000250 
000250 



; * 
;* 


USAGE 


OF THE SUBROUTINE E 


; * 


MOV 


;(fMFPDLP.$LPERR ; 


; * 


MOV 


*(NIW9),MFPDPS ; 


; * 


MOV 


y^TRAPRTN. MFPDVC ; 


• * 


MOV 


/f(NUMB),Rd 


;* ilT IS ASSUMED THAT ALL PDR' 


• * 


JSR 


PC, MFPDTS 


; * 


MFPD 


(MODE) 


;* 


NOP 




■ * 


ERROR 


+(NUM8) 


; * 


TST 


(SP) + 


;;******* *******l^***^**********r*H 


MFPDTS: 


CLR 


ERLOOP 




MOV 


(SP), R5 




MOV 


(R5)+,MFPDLD 




MOV 


(R5)+,MFPDLD+2 ; 




ADD 


ftlOASP) 


MfPDLP: 


MOV 


(PC) + ,a(PC) + 


^FPDPS: 


.WORD 







.WORD 


PSW 




MOV 


aMFPDVCMMVEC : 


MFPDLD: 


.WORD 


0,0 




MOV 


/^M6MERR,MMVEC 




MOV 


(SP)+, R1 




CMP 


R0,R1 




BEQ 


1$ 




JSR 


PCERPREP 


1$: 


TST 


ERLOOP 




BNE 


MFPDLP 




RTS 


PC ; 


MFPDVC: 


.WORD 






PUT ADDRESS OF LOOPING LOCATION IN SLPERR 

PUT PS PREVIOUS/CURRENT MODE VALUE IN THIS LOCATION 

LOAD THE TEST EXCLUSIVE TRAP ROUTINE TO MFPDVC 

SETUP ADDRESS IN R2 

S/PAR'S WILL ALSO BE SET UP PROPERLY) 

60 DO THE TEST 

MFPD INSTRUCTION TO TEST IS PUT HERE 

NEEDED FOR MODES 1,2,4, & 5 *ONLY* 

RETURN IS HERE FOR ERROR CALLS 

POP STACK - EXTRA RETURN INSTALLED BY SUBRTN NOT NEEDED 

********************4**«**«4«A**** 

CLEAR THE ERROR LOOPING FLAG 

MOVE RETURN ADDRESS TO R5 FOR LOADING 

MOVE MFPD INSTRUCTION TO THE LOCATION BELOW 

MOVE NEXT WORD TO THE NEXT LOCATION 

FUDGE RETURN TO THE "TEST PASSED" LOCATION 

SET VP PSW AS LOADED BY TEST RUNNING JHIS SUBROUTINE 

LOCATION TO HOLD NUMBER TO LOAD THE PSW 

LOAD THE PSW 

SET M.M. VECTOR TO TRAP CATCHER OF THE TEST 

LOCATIONS TO HOLD THE MFPD INSTRUCTION 

RESTORE MM VECTOR TO NORMAL ROUTINE 

POP K/S/U STACK INTO R1 

WAS DATA FETCHED SAME AS DATA STORED 

BRANCfl U CORRECT DATA WAS FETCHED 

GO PREPARE ERLOOP, STACK AND EXIT TO ERROR CALL 

SEE IF THIS "PASSED" IS IN AN ERROR LOOP 

BRANCH BACK IF SO 

EXIT - TEST PASSED 

LOCATION TO HOLD MM VECTOR OF TEST 



CKKTBDO 11/44 MEM M6MT PRT B 
SCOPE HANDLER ROUTINE 

1785 
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SEQUENCE 39 



003042 
003042 
003044 
003052 



003056 
003062 
003070 
003074 
003100 
003102 
003104 
003110 
003112 
003112 
003120 
003122 
005130 
003132 
003140 
003146 
003150 
003156 
003160 
003164 
003170 
003172 
003200 
003202 
003210 
003212 
003216 
003222 
0\;Z25Q 
003234 
003240 
003244 
005252 
003260 
003264 
003266 



104410 
032777 
001077 



003054 000416 



013746 
012737 
005737 
012637 
000446 
022626 
012637 
000434 

032777 
001404 
127737 
001450 
013737 
032737 
001406 
042737 
104177 
105037 
105737 
001412 
032777 
00U04 
013737 
000420 
105037 
105237 
113737 
011637 
011637 
005037 
112737 
013777 
013716 
000002 
000000 



000004 
003102 
177060 
000004 



000004 

000400 

176012 

177/66 
000001 



001103 
001103 

001000 

00111C 

001103 
001102 
001102 
001106 
001110 
001212 
000001 
OCT 102 
001106 



000004 



176020 

001 . J2 

003c't6 
003266 



000001 177766 



175740 
001106 

001230 



001115 
175662 



.SBTTL bCOPE HANDLER ROUTINE 

;*THJS ROUTINE CONTROLS THE LOOPING OF SUBTESTS. IT WILL INCREMENT 

;*AND LOAD THE TEST NUMBER($TSTNM) INTO THE DISPLAY REG. (DISPLAY<7:0» 

;*AND LOAD THE ERROR FLAG (SERFLG) INTO DISPLAY<15:08> 

;*THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 

;*SW14=1 LOOP ON TEST 

;*SW09=1 LOOP OH ERROR 

;*SW08=:1 LOOP ON TEST IN SWR<7:0> 

;*CALL 

;* SCOPE ;;SC0PE=I0T 



040000 176066 1$: 



SSCOPE; 

CKSWR 

BIT 

BNE 

;ft/f»P/fSrARJ OF 

SXTSTR: BR 



.y8iri4,aswR 

SDVER 
CODE FOR THE XOR 
6$ 



MOV 
MOV 
TST 
MOV 
BR 
5$: C^!.'' 
MOV 
BR 

BIT 
BEO 
CMPB 
BEQ 
2$: MOV 
BIT 
BEO 
BIC 
EMT 
CLR8 



2000$: 



7$: 

4$: 

SSVLAD: 



$0VER: 



CPSAVE : 



TST8 

BEO 

BIT 

BEQ 

MOV 

BR 

CLR8 

INCB 

M0V8 

MOV 

MOV 

CLR 

M0V8 

MOV 

MOV 

RTI 

.WORD 



a^ERRVEC,-(SP) 
^5$,a^ERRVEC 
a-* 177060 
(SP)+. a#ERRVtC 
ISVLAD 

(sp;+, (SP)+ 

(SP) ^-^a/^ERRVEC 
7$ 
OF CODE FOR Tk'E XOR 

#aiT08,aswR 

2$ 

aSWR,$TSTNM 

SOVER 

177766, CPSAVE 

#fll TOO, CPSAVE 

2000$ 

#81 TOO, 177766 

+177 

$ERFLG 

$ERFLG 

$SVLAD 

*8IT09,aSWR 

4$ 

$LPERR,:>LPADR 

$OVER 

$ERFL6 

$TSTNM 

$TSTNM.$TESTN 

(SP),$LPADR 

(SP), $LPERR 

$E SCAPE 

#1,$ERMAX 

$TSTNM,aDISPLAY 

$LPADR,(SP) 







TcST FOR CHANGE IN fOFT-SWR 

LOOP ON PRESENT TEST* 

YES IF SW14=1 
TESTER^#'/## 

If RU;iNlNG ON THE *'XtlR" TESTER CHANGE 

THIS INSl RUCTION TO h "NOP" (N0P=24O) 

SAVE IHE CONTENTS OF THE ERROR VECTOR 

SET FOR ] TMEOUT 

TIME OUT ^N XOR? 

RESTORE THE ZRROR VECTOR 

60 TO THE NEXT TEST 

CLEAR THE STACK AFTER A TIME OUT 

RESTORE THE ERROR VECTOR 

LOOP ON THE PRESENT TEST 
JESJERAMM0M 

LOOP ON SPEC. TEST? 

BR If NO 

ON THE RIGHT TEST? SWR<7:0> 

BR IF YES 

HOVE CPU ERR REG VALUE TO LOC FOR TST 
SEE IF THE POWER MONITOR BIT IS ON 
BRANCH TO CONTINUE ROUTINE IF CLEAR 
CLEAR THE BIT FOUND TO BE SET 
CALL SPECIAL POWER FAIL BIT ERROR CALL 
CLEAR THF ERROR FLAG 

HAS AN ERROR OCCURRED? 

BR IF NO 

LOOP ON ERROR? 

BR If NO 

SET LOOP ADDRESS TO LAST S'^PE 



ZERO THE ERROR FLAG 
COUNT TEST NUMBERS 
SET TEST NUMBER IN APT MAILBOX 
SAVE SCOPE LOOP ADDRESS 
SAVE ERROR LOOP ADDFESS 
CLEAR THE ESCAPE FROM ERROR ADDRESS 
ONLY ALLOW ONE(l) EKROR ON NEXT TEST 
DISPLAY TEST NUMBER 
FUDGE RETURN ADDRESS 
FIXES PS 
LOCATION TO SAVE CPU ERR REG CONTENTS 



DPM001 
DPM001 
DPM001 
DPM001 
DPMOOl 
DPM001 



; DPMOOl 
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SEQUENCE 40 



003270 
00:5274 
003276 
003502 
003306 
003312 
003316 
003322 
003326 
003334 
003340 
00i542 
003350 
003356 
003360 
003364 
003370 
003374 
003402 
003410 
00341 o 
003420 
003/124 
007426 
003434 
003442 
0J3444 
(03452 
(03460 
('03466 
(103470 
003474 
O03A74 
003502 
003504 
J03510 
303514 
303514 
D0352? 
D03524 
D03532 
303*^36 
?03537 



105037 
104410 
010037 
010137 
010237 
010337 
010437 
010537 
113737 
105237 
001775 
013777 
03277/ 
001402 
1044C1 
003237 
011637 
162737 
117737 
122737 
001426 
105737 
001021 
013737 
032737 
001414 
042737 
113737 
112737 
000402 
105037 

012777 
001004 
004737 
104401 

122737 
001007 
113737 
004737 
000 
000 



003646 

001162 
001164 
001166 
001170 
001 172 
001174 
001102 
001103 

001102 
002000 

001214 
001112 
001116 
000002 
175510 
000177 

003646 

177766 
000001 

000001 
001114 
000177 

003646 

020000 

003650 
001221 

000001 

001114 
006014 



001254 



175572 
175562 



001116 
001114 
001114 



003266 
003266 

177766 

003646 
001114 



175436 

001244 
003536 



.SPVTI ERROR HANDLER ROUTINE 

•THIS ROUTINE WILL INCREMENT THE ERROR fLAG AND THE ERROR COUNT, 
*SAVfc THE ERROR ITEM NUMBER AND THE ADDRESS OF THE ERROR CALL 
*AND GO TO cRRTVP ON ERROR 

BV THIS ROUTINE ARE: 



♦THE SWITCH OPTIONS PROVIDED 

-SW15=1 HALT ON ERROR 

*SW13=1 INHIBIT ERROR 

*SW10=1 BELL ON ERROR 

*SW09=1 LOOP ON ERROR 

*CALL 

* ERROR N 



TYPEOUTS 



;;ERROR=EMT AND N=ERROR ITEM NUMBER 



SERROR: 



7$: 



1$; 



1000$: 
1001$; 



20$: 



21$: 



CLR8 

CKSWR 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

Move 

INCB 

aEQ 

MOV 

BIT 

BcQ 

TYPE 

INC 

MOV 

sue 

MOVB 

CMPB 

BEO 

TSTB 

BNE 

MOV 

BIT 

BEO 

BIC 

MOVB 

MOVB 

BR 

CIRB 

BIT 
BNE 
JSR 
TYPE 

CMPB 

BNE 

MOVB 

JSR 

.BYTE 

.BYTE 



IBSAVE 



RO,$REGO 

RU$REG1 

R2,$REG2 

R3,$REG3 

R4,$REG4 

R5.$REG5 

JTSTNMJESTNO 

$ERFLG 

7$ 

$TSTNM,aDISPLAY 

*BJT10,SSWR 

1$ 

,$8ELL 

SERTTL 

(SP), $ERRPC 

#2,$ERRPC 

a$ERRPC,$ITEMB 

JC177.$1TEMB 

1001$ 

IBSAVE 

1000$ 

177766, CPSAVE 

#BIT00,CPSAVE 

1001$ 

^BI TOO, 177766 

$ITEM6, IBSAVE 

#177.$ITEMB 

1001$ 

IBSAVE 

#8IT13,dSUR 
20$ 

PCERRTYP 
,$CRLf 

*APTENV,$ENV 

2$ 

$ITEMB,21$ 

PC,$ATY4 







CLEAR THE HEM BYTt SAVE LOCATION 

.•TEST FOR CHANGE IN SOFT-SWR 

SAVE THE CONTENTS OF RO 

SAVE THE CONTENTS OF R1 

SAVE THE CONTENTS OF R2 

SAVE THE CONTENTS OF R3 

SAVE THE CONTENTS OF R4 

SAVE THE CONTENTS OF R5 

SAVE THE TEST NIWER 

SET THE ERRC? FLAG 

rON'T LET THE FLAG GO TO ZERO 

DISPLAY TEST NUMBER AND ERROR FLAG 

BELL ON ERROR? 

NO - SKIP 

RING BELL 

COUNT THE NUMBER OF ERRORS 

GET ADDRESS OF ERROR INSTRUCTION 

STRIP AND SAVE THE ERROR ITEM CODE 
SEE IF THIS IS THE POWER FAIL CAi L 
BRANCH AROUND ROUTINE IF IT IS 
SEE IF THIS IS THE 2ND ERROR CALL 
BRANCH If SO 

MOVE CPU ERR REG TO CPSAVE FOR TEST 
SEE IF POWER MONITOR BIT IS SET 
BRANCH U OK 
CLEAR THE BIT FOUND SET 
MAKE IBSAVE NON-ZERO FOR DUAL CALL 
SET %\nm TO SPECIAL POWER FAIL PNTR 
BRANCH OVER IBSAVE CLEARING 
CLEAR IBSAVE SO AFTER 2ND ERROR, EXIT 

;S;nIP TYPEOUI if SET 

;SKIP TYPEOUTS 

;G0 TO USER ERROR ROUTINE 



RUNNING IN APT MODE 

NO. SKIP APT ERROR REPORT 

SET ITEM NUMBER AS ERROR NUMBER 

REPORT FATAL ERROR TO APT 



;nPM001 



DPMOOl 
PPM001 
DPMOOl 
DPMOOl 
DPM001 
DPMOOl 
DPMOOl 
DPMOOl 
DPMOOl 
DPMOOl 
DPM001 
DPM001 
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37-1 



0035A0 
0035A2 
0035A6 
003550 
003554 
003556 
003560 
003562 
003570 
00357Z 
003576 
003600 
003604 
003610 
003612 
003616 
003620 
003624 
003624 
003652 
003634 
003636 
005636 
003642 
003644 
003646 



00077/ 
105737 
001005 
005777 
100002 
000000 
104410 
032777 
001405 
105737 
001256 
013716 
005737 
001405 
105737 
001246 
013716 

022737 
001001 
000000 

105737 
001234 
000002 
000000 



00?>646 
175364 

001000 

003646 

001110 
001212 

003646 

001212 

036252 

003646 



22$: 
2$; 



175350 3$: 



4$; 



000042 



5$: 



6$: 



J8SAVE: 



BR 

TSTB 

BNE 

TST 

BPL 

HALT 

CKSWR 

BIT 

eEQ 

TST8 

BNE 

MOV 

TST 

BEQ 

TST8 

BNE 

MOV 

CMP 
ONE 
HALT 

TSTe 
BNE 
RTI 
.WORD 



22$ 

I8SAVE 

3$ 

aswR 

3$ 



#aiT09,aswR 

4i 

I8SAVE 

7$ 

$LPERR,(SP) 

$E SCAPE 

5$ 

leSAVE 

7$ 

SESCAPE, (SP) 

*$£NDAD, 01^42 
6$ 



I8SAVE 
7$ 





;APT ERROR LOOP 

SEE If POWER FAIL ERROR CALL 

BRANCH IF NOT - HALT NOT ALLOWED 

HALT ON ERROR 

SKIP IF CONTINUE 

HALT ON ERROR! 

TEST FOR CHANGE IN SOFT-SWR 

LOOP ON ERROR SWITCH SET? 

BR If NO 

SEE IF THIS IS THE PWR MNTR BIT 
BRANCH SACK If SO - FUDGING NOT 

FUDGE RETURN FOR LOOPING 

CHECK FOR AN ESCAPE ADDRESS 

BR If NONE 
SEE IF THIS IS THE PWR MNTR BIT 
BRANCH BACK IF SO - FUDGING NOT 
; FUDGE RETURN ADDRESS FOR ESCAPE 



SEQUENCE 41 



DPM001 
UPM001 



ERROR ; 
ALLOWED; 



ERROR ; 
ALLOWED; 



DPM001 
DPM001 



DPM001 
DPM001 



;ACT-11 
.'BRANCH 
:YES 



AUTO-ACCEPT? 
If NO 



SEE IF THIS 15 
BRANCH BACK TO 

LOC*N TO HOLD 



THE PWR FAIL ERROR CALL ;DPM001 
CALL ORIGINAL ERR IF SO ;DPM001 



$]TEMB DURING DUAL ERR ;DPM001 
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39 



1789 

1790 
1791 
1792 
1793 
179A 
179S 
1796 
1797 
1798 
1799 
1800 
1801 
1802 
1803 
180*1 
1805 
1806 
1807 
1808 
1809 
1810 
1811 
1812 
1613 
18U 
1815 
1816 
1817 
1818 
1819 
1820 
1821 
1822 
1823 
182^ 
1825 
1826 
1827 
1828 
1829 
1830 
1831 
1832 
185? 
183^ 
1835 
1836 
1837 
1838 
1839 
1840 
18A1 
1842 
1843 
1844 
18^*5 



003650 
003654 
003656 
003660 
003664 



003672 
003674 
003676 
00370-* 

003704 
003710 
003712 
003714 
005716 
003720 
003722 
003726 
003732 
003734 
003736 
003740 
C03744 
003750 
003752 
003754 
003756 
003''62 
003764 
003766 
003770 
003772 
003774 

003776 
004000 
004002 

004004 
004010 
004012 
004014 
004016 

004020 
004024 
004026 
004030 
004032 

004C34 
004040 
004042 
004044 
004050 



104401 
010046 
005000 
153700 
001004 



003666 013746 



104402 
000530 
122700 
001003 
012700 
000406 
005300 
006300 
006300 
006300 
062700 
012037 
001404 
104401 
000000 
104401 
012037 
001404 
104401 
000000 
104401 
010146 
012001 
00U72 
012000 
105710 
001003 

013146 
104402 
000456 

121027 
001003 
013146 
104405 
000450 

121027 
001003 
013146 
104406 
000442 

121027 
00)011 
012146 
004737 
062716 



001221 
001114 
001116 

000177 
004172 



001320 
003736 



001221 
003754 



001221 



000001 



000002 



000003 



007066 
0C9003 



ERRTYP 



1$: 
100$: 

110$: 

2$: 
3$: 

4$: 
5$: 

6$: 

;*THJS 



:*THIS 



••THIS 



;MHJS 
^$; 



TYPE 

WOV 

C.R 

BISB 

BNE 

MOV 

TVPOC 

BR 

CMPB 

BNE 

MOV 

BR 

DEC 

ASl 

ASL 

ASL 

ADD 

MOV 

BEQ 

TVPE 

-WORD 

TYPE 

MOV 

BEQ 

TYPE 

.WORD 

TYPE 

MOV 

MOV 

BEQ 

MOV 

rSTB 

BNE 
CODE IS 

MOV 

TYPOC 

BR 
CODE IS 

CMP8 

BNE 

MOV 

TYPDS 

BR 
CODE fS 

CMPB 

BNE 

MOV 

TYP8N 

BR 
CODE IS 

CMPB 

BNE 

MOV 

JSR 

ADD 



,$CRLF 

RO,-CKSP) 

RO 

9*$JTEMB,R0 

1$ 

$ERRPC.-(SP) 



13$ 
#177, RO 

#PFE CWS.RO 

110$ 

RO 

RO 

RO 

RO 

#$ERRrB,RO 

<R0>+,2$ 

3$ 



.JCRLF 
(R0)+,4$ 
5$ 



,$CRLr 

RK-(KSP) 

(RO)t,Rl 

12$ 

(R0)+,R0 

(RO) 

FOR OCTAL (16-8iT) 
a(R1)+,-(SP) 



SEQUENCE 42 



y\PE <CRLE> 

SAVE RO. 

PICKUP THE ITEM INDEX 

If ITEM NUMBER IS 2ER0, JUST 

TVPE THE PC OF THE ERROR 

;SAVE $ERRPC FOR TYPEOUT 

.■ERROR ADDRESS 

;G0 TYPE— OCTAL ASCII (ALL DIGITS) 

GET OUT 

SEE IF THIS ERROR CALL IS THE POWER MONITOR BIT MLL 

BRANCH IF NOT 

MOVE ADDREi>S OE POWER MONITOR BIT ERROR TO RO 

BRANCH TO CALL THE ERROR 

ADJUST THE INDEX SO THAT IT WILL 

WORK FOR THE ERROR TABLE. 



FORM TABLE POINTER 

PICKUP 'TRROR MESSAGE" POINTER 

SKIP TYPEOUT IF NO POINTER 

TYPE THE "ERROR MESSAGE" 

*TRROR MESSAGE" POINTER GOES HERE 

"CARRIAGE RETURN" K 'lINE FEED" 

PjrKUP "DATA HEADER" POINTER 

SKIP TYPEOUT IF 

lYPE THE "DATA HEADER" 

"DATA HEADER" POINTER GOES HERE 

"CARRIAGE RETURN" g "LINE FEED" 

SAVE Rl 

PICKUP "DATA TABLE" POINTER 

BR IF NO DATA TO BE TYPED 

PICKUP "DATA FORMAT" POINTER 

IS IT FORMAT 0? 

BR IF NO 

FORMAT (DF-0) 
.'SAVE a(RlH FPR TYPEOUT 



11$ 
FOR DECIMAL 

8$ 

a(Ri)+," (SP) 



;;G0 TYPE— OCTAL ASCIKALL DibiTS) 



11$ 

FOR BINARY FORMAT 
(R0),#2 
9$ 
a(Rl)t,"(SP) 



FORMAT (DF=i) 

IS IT FOR,^T 1? 

BRANCH IF NO 

;SAVE a(RI)+ FOR TYPEOUT 

;G0 TYPE— DECIMAL ASCII WITH 



SIGN 



11$ 
FOP OCTAL 
(R0),*3 
15$ 

(R1)*,-(KSP) 
PC,$DB20 
*3,(KSP) 



(DF=2) 

IS ir FORMAT 2 
BRANCH IF NO 
;SAVE a(R1)+ FOR 
;G0 TYPE— BINARY 



TYPEOUT 
ASCII 



(22"BiT) FORMAT (DF=3) 
IS IT FORMAT 3? 
BRANCH IF NO 

PUT ADDRESS OF FIRST LOC. ON STACK 
CONVERT TWO LOCS. TO AN ASCII STRING 
ONLY NEED 8 CHARACTERS NOT 11 
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SEQUENCE ^>3 



18A6 
18A7 
1848 
1849 
1850 
1851 
185? 
1853 
1854 
1855 
1856 
1857 
1853 
1859 
1860 
1861 
1862 
1863 
1864 
1865 
1866 
1867 
1868 
1869 
1870 
1871 
1872 
1873 
1874 
1875 
1876 

1877 



1878 



1879 
1880 

1881 



004054 
004060 
004062 

004064 
004066 
004070 
004072 
004074 
004100 
004104 
004110 
004114 
004120 
004124 
0r:.i30 
004132 
004134 
004136 
004140 
004142 
004144 
004150 
004152 
004154 
004156 
004160 
004164 
004166 
004171 
004172 
004200 
004202 
004205 
004210 
004213 
004216 
004221 
004224 
004227 
004232 
004235 
004240 
004242 
004245 
004250 
004253 
004256 
004261 
004264 
004267 

004272 

0043C0 
004302 
004305 



012637 
104401 
000000 

010246 

010346 

015103 

005002 

073227 

010237 

010337 

012746 

004737 

062716 

012637 

104401 

000000 

012603 

012602 

00571 1 

001404 

104401 

105720 

000707 

012601 

012600 

104401 

000207 

040 

000 

004202 

004302 

120 

105 

115 

111 

122 

in 

127 
040 
125 
OiO 
12^ 
124 
124 
040 
122 
120 
040 
125 
122 

001230 

000000 

000 

000 



004062 



000006 
001206 
001210 
001206 
007066 
000003 
004132 



004166 



001221 

040 

004242 

117 
122 
117 
12« 
040 
124 
101 
106 
116 
123 
000 
105 
116 
040 
122 
103 
103 
105 
000 

001116 

000 



000 

004272 

127 
040 
116 
117 
102 
040 
123 
117 
104 
105 

123 
117 
105 
040 
040 
120 
122 

003266 
000 



10$: 

;*TH1S 

15$: 



16$: 
11$: 



12$: 
13$: 



14$: 
PFECWS 



MOV 
TYPE 
.WORD 
CODE IS 
MOV 
MOV 
MOV 
CLR 
ASHC 
MOV 
MOV 
MOV 
JSR 
ADD 
MOV 
TYPE 
.WORD 
MOV 
MOV 
TST 
BEO 
TYPE 
TST8 
BR 
MOV 
MOV 
TYPE 
RTS 

.ASCJZ 
.BYTE 
.WORD 



(KSP)+, 10$ 


FOR OCTAL (22-8IT) 
R2,-<KSP) 
R3,'(KSP) 
a(R1)+,R3 
R2 

*6.R2 
R2,$TMP4 
R3,$TMP5 
nTMP4,"(KSP) 
PC,$D820 
^3,(KSP) 
<KSP) + J6$ 



(KSP)+, R3 

(KSP)+,R2 

(R1) 

12$ 

,14$ 

(R0) + 

6$ 

(KSP)+, R1 

(KSP) +,R0 

.$CRLF 

PC 

/ / 



PFECFM,PFECDH,PFE 



PUT ADDRESS OF ASCII CHARS. AT 10$ 
TYPE OCTAL VALUE OF 22-81 T BINARY NO. 

FOmMAT FOR A PAR LEFT SHIFTED 6 (PF=4) 
SAVE R2 ON STACK 
SAVE R3 ON STACK 
LOAD DATA WORD INTO R3 
R2 HOLDS UPPER SIX BITS OF NUMBER 
SHIFT VALUE LEFT 6 TIMES 
HOLDS LOWER 16 BITS OF ADDRESS 
HOLDS UPPER 6 BITS OF ADDRESS 
PUT ADDRESS OF LOWER BITS ONTO STACK 
CONVERT TWO LOCS, TO AN ASCII STRING 
ONLY NEED 8 CHARACTERS NOT 11 
PUT ADDRESS OF ASCII CHARS. Al 16$ 
TYPE OCTAL VALUE OF 22-81 T BINARY NO. 

RESTORE R3 

RESTORE R2 

IS THERE ANOTHER NUMBER? 

BR IF NO 

TYPE TW0(2) SPACES 

POINT TO NEW "DATA FORMAT" 

LOOP 

RESTORE R1 

RESTORE RO 

"CARRIAGE RETURN" & "LINE FEED" 

RETURN 

TW0(2) SPACES 

CDT.PFECDF 



PFECEM: ,ASCI2 7P0WER MONITOR BIT WAS FOUND SET? 



PFECDH: .ASCIZ 7TESTN0 ERR PC CPUERR? 



.EVEN 
PFECDT: .WORD 

PFECDF: .BYTE 



$TESTN,$£RRPC,CPSAVE,0 
0.0.0,0 
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40 



JEQUENCE 44 



.ENABL LS8 

;*SOFTWARE SWITCH REGISTER CHANGE ROUTINE. 

.-♦ROUTINE IS ENTERED FROM THE TRAP HANDLER, AND WILL 

;*SERVICE THE TEST FOR CHANGE IN SOFTWARE SWITCH REGISTER TRAP CALL 

;*WHEN OPERATING IN TTY FLAG MODE 



004306 


022737 


000176 


001140 


SCKSWR: 


CMP 


#SWREG,SWR 


;IS THE SOFT-SWR SELECTED? 


004314 


001114 








BNE 


15$ 


.-BRANCH If NO 


004316 


105777 


174622 






TSTB 


a$TKS 


;CHAR rHEPEl 


004522 


loom 








BPL 


15$ 


;lf NO, DON'T WAIT AROUND 


004324 


117746 


174616 






MOVP 


a$rKB,-(SP) 


.-SAVE THE CHAR 


004330 


042716 


177600 






BIC 


**C17^(SP) 
#7-(SP5+ 

i5i 


;STRIP-0FF THE ASCII 


004334 


022726 


000007 






CMP 


:1S IT A CONTROL G? 


004340 


001102 








BNE 


;N0. RETURN TO USER 


004542 


123727 


001154 


000001 




CMP8 


$AUT0B,#1 


;ARF WE RUNNING IN AUTO-MODE? 


004350 


001476 








BEQ 


15$ 


;flRANCH If YES 


004552 


104401 


005253 






TYPE 


,$CNrL6 


.-ECHO THE CONTROL-G (*G) 


004556 


104401 


005260 




SGTSWR: 


TYPE 


,$MSWR 


.-TYPE CURRENT CONTENTS 


004562 


013746 


000176 






MOV 


SWREG,-(SP) 


.-SAVE SWRE6 FOR TYPEOOT 


004566 


104402 








TYPOC 




;G0 TYPE— OCTAL ASCII (ALL DIGITS) 


004570 


104401 


005271 






TYPE 


,$MNEW ; 


.-PROMPT FOR NEW SWR 


004574 


005046 






19$: 


CLR 


-(SP) 


.•CLEAR COUNTER 


004576 


005046 








CLR 


-(SP) 


;THE NEW SWR 


004400 


105777 


174540 




7$: 


TSTB 


S$TKS 


;C.HAR THERE? 


004404 


100575 








BPL 


7$ 


;1F NOT TRY AGAIN 


004406 


117746 


174554 






M0V8 


a$TK8,"(SP) 


:PKK UP CHAR 


004412 


042716 


177600 






BIC 


#*C177^(SP) 


;MAKt iJ 7"8fT ASCII 


004416 


021627 


000003 






CMP 


(SP) M^ 


;IS IT A CONIROL-C? 


004422 


001015 








BNE 


9$ 


.'BRANCH IF NOT 


004424 


104401 


001512 






TYPE 


.$CNTLC 


;YES. ECHO CONTROL-C (*C) 


004450 


062706 


000006 






ADD 


*6,SP 


; CLEAN UP STACK 


00^454 


125727 


001135 


000001 




CMP8 


$INTAG,#1 


;RFENA8LF TTY KEYBOAkD INTERRUPTS? 


004442 


001005 








BNE 


8$ 


.-BRANCH IF NO 


004444 


012777 


000100 


174472 




MOV 


*!'ioo,a$TKS 


.-ALLOW TTY KEYBOARD INTERRUPTS 


004452 


000157 


005302 




8$: 


JMP 


CNTRLC 


;CONTROL"C RESTART 


004456 


021627 


000025 




9$: 


CMP 


(SP).M25 


;IS IT A CONTROL-U? 


004462 


001005 








BNE 


10$ 


; BRANCH IF NOT 


004464 


104401 


005246 






TYPE 


.$CNTLU 


;YES. ECHO CONTROL-U C'U) 


004470 


062706 


000006 




2C<: 


A'^'J 


M6.SP 
19$ 


.'IGNORE PREVIOUS INPUT 


004474 


000737 








BR 


.-LET'S TRY IT AGAIN 


004476 


021627 


000015 




10$: 


CMf^ 


(SP). #15 


;IS IT A <CR>? 


004502 


001022 








BNE 


16$ 


.-BRANCH If NO 


004504 


005766 


000004 






TST 


4(SP) 


;yES. IS IT THE HRST CHAR? 


004510 


001405 








BEQ 


11$ 


.■BRANCH IF YES 


004512 


016677 


000002 


174420 




MOV 


2(SP),aswR 


.-SAVE NEW SWR 


004520 


062706 


000006 




11$: 


ADD 


#6,SP 


.•CLEAR UP STACK 


004524 


104401 


001221 




14$: 


TYPE 


,$CRLF 


;ECHO <CR> AND <L/> 


004530 


123727 


001135 


000001 




CMP6 


ilNTAG,#1 


;RL-ENABLE TTY KBD INTERRUPTS? 


004536 


001003 








BNE 


15$ 


.BRANCH IF NOT 


004540 


0U777 


000100 


174376 




MOV 


#100 aSTKS 


.-RE-ENABLE TTY KBD INTERRUPTS 


004546 


000002 






15$: 


RTI 




.-RETURN 


0J4550 


004737 


005644 




16$: 


JSR 


PC,$TyPEC ; 


.•ECHO CHAR 


004554 


021627 


000060 






CMP 


(SP),#60 


.'CHAR < 0? 


004560 


002420 








BLT 


18$ 


.-BRANCH IF YES 


004562 


021627 


000067 






CMP 


(SP),#67 


;CHAR > 7? 
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00 A 566 


003015 








B6T 


18$ 


•;8RANCH IF YES 




0OA570 


042726 


000060 






BIC 


*60, (SP)+ 


•;STRIP-OFF ASCII 




00A57A 


005766 


000002 






TST 


2il?) 


•;IS THIS THE FIRST CHAR 




00A600 


001403 








BEQ 


17$ 


•;BRANCH IF YES 




00A602 


006316 








ASL 


(SP) 


•;N0. SHIFT PRESENT 




00A60H 


006316 








ASL 


(SP) 


:; CHAft OVER TO MAKE 




004606 


006316 








ASL 


(SP) 


ROOM FOR NEW ONE. 




0OA610 


005266 


000002 




17$: 


INC 


2(SP) 


■;KEEP COUNT OF CHAR 




0046U 


056616 


M777t 






BIS 


-2(SP),(SP) 


•;SET \H NEW CHAR 




004620 


000667 








BR 


7$ 


•;GET THE NEXT ONE 




004622 


104401 


001220 




18$: 


TYPE 


,$QU[:s 


■;TYPE ?<CR><LF> 




004626 


000720 






.DSA8L 


BR 
LS8 


20$ 


•.•SIMULATE CONTROL-JJ 












;;**^*^***^*************ik*******m^****)^n***»!^!*nimi^*n***»^ ******** 












;*THJS 


ROUTINE 


WILL INPUT A SINGLE CHARACTER FROM 1HE TTY 












;*CALL: 


















;* 


RDCHR 




•; INPUT A SINGLE CHARACTER FROM THE TTY 












;* 


RETURN 


HERE 


•; CHARACTER IS ON THE STACK 












;* 






•;WITH PARITY BIT STRIPPED OFF 




004630 


011646 






iRDCHR: 


MOV 


(SP),-(SP) 


•;PUSH DOWN THE PC 




004632 


016666 


000004 


000002 




MOV 


4(SP),2(SP) 


';SAVE THE PS 




004640 


105777 


174300 




1$: 


TST8 


a$TKS 


•;WAIT FOR 




004644 


100375 








BPL 


1$ 


';A CHARA.CTER 




004646 


117766 


^7i^27k 


000004 




KOVB 


a$TK8,4(SP) 


■;READ THE ^ty 




004654 


042766 


}77600 


000004 




BIC 


;y*C<177>,4(SP) 


•;6ET «ID OF JUNK IF ANY 




004662 


026627 


000004 


000023 




CMP 


4(SP),#23 


•;IS U A CONTROL-S? 




004670 


001013 








BNE 


3$ 


•;P;^ANCH IF NO 




004672 


105777 


174246 




2$: 


TST6 


a$TKS 


'J WAIT FOR A CHARACTER 




004676 


100375 








BPL 


2$ 


-;LOOP UNTIL ITS THERE 




004700 


117746 


\7k2U2 






M0V8 


Q$TK8,-(SP) 


•;G£T CHARACTER 




004704 


042716 


177600 






BIC 


**C177,(SP) 


•;MAKE IT 7-Bir ASCII 




004710 


022627 


000021 






CMP 


(SP)+,#21 


•;IS IT A CONTROL-Q? 




004714 


001366 








BNE 


2$ 


-A^ NOT DISCARD IT 




004716 


000750 








BR 


1$ 


■;YES. RESUME 




004720 


026627 


000004 


000021 


3$: 


CMP 


4(SP),X^!;X0N 


•;IS IT A RANDOM XON? 




004726 


001744 








BEQ 


1$ 


•;BRANCH IF YES 




004730 


026627 


000004 


000140 




CMP 


4(SP).#140 


;IS IT UPPFR CASE? 




004736 


002407 








BLT 


4$ 


•;BRANCH IF YES 




004740 


026627 


000004 


000175 




CMP 


4(SP),^175 


•;IS IT A SPECIAL CHAR? 




004746 


003003 








BGT 


4$ 


■;BRANCH IF YES 




004750 


042766 


000040 


000004 




BIC 


*40,4{SP) 


•;MAKE IT UPPFR CASE 




004756 


000002 






4S: 


RTI 




•;6C BACK TO USER 












;•**********************«******* 


»**«.**************************** 












;*THI'; 
;*CALl: 

;* 


ROUTINE 


WILL INPUT A STRIf 


^G FP^M THE TTY 












Pt>LIN 




; INPUT A STRING FROM THE TTY 












;* 


RETURN 


HERE ; 


•;ADDRESS OF NRST CHARACTER WILL BE ON 












JrDLJW: 






-.•TERMINATOR WILL BE A BYTE OF ALL O'S 




0('4760 


010346 






MOV 


R3,-(SP) 


•;SAVE R3 




0^4762 


C05046 








CLR 


-(SP) 


; CLEAR THE RUBOUT KEY 




004 764 




C0:236 




"t. 


MOV 


*$TTYIN.R3 


•;G£T ADDRESS 




004770 


0227i)^ 


005246 




2': 


CMP 


nTTYIN+8.,R3 


;3UFFER FULL? 




QOiJli^ 


101467 








BLOS 


4$ 


•;BR IF YES 




004776 


104411 








RDCHR 




;Gn RL-AD ONE CHARACTER FROM THE TTY 




005000 


112ol3 








MOVB 


(SP)*-(R3) 


;GET CHARACTER 




00500c 


122713 


000003 






CMPB 


filAKi) 


';IS IT A CONTROL-C? 



SEQUENCE 



45 



;RAN001 
;RAN001 



THE STACK 
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SEQUENCE 46 



005006 
005010 
005014 
005016 
005020 
005024 
005030 
005032 
005034 
005036 
005044 
005050 
005054 
005056 
005062 
005064 
005070 
005074 
0050/6 
005100 
005102 
005110 
005114 
005116 
005122 
005124 
005130 
005132 
005136 
005140 
005142 
005146 
005152 
005154 
005160 
005162 
005166 
005172 
005176 
005200 
005204 
005210 
005212 
005214 
005216 
005224 
005232 
005234 
005235 
005236 
005246 
005251 
005253 
005256 
005260 
005263 
005266 



001006 
104401 
005726 
012603 
000137 
122713 
001022 
005716 
001007 
112737 
104401 
012716 
005303 
020327 
103434 
111337 
104401 
000735 
005716 
001 40(^ 
11273/ 
104401 
005016 
122713 
001003 
104401 
000715 
122713 
001011 
105013 
104401 
104401 
000706 
104401 
000701 
111337 
104401 

001274 
105063 
104401 
005726 
012603 
011646 
016666 
012766 
000002 
000 
000 

136 
012 
136 
012 
015 
127 
075 



001312 



005302 
000177 



000134 
005234 
^77777 

005256 

005234 
005234 



000134 
005234 

000025 

005246 

000022 



001221 
005236 

001220 

005234 
005234 
000015 

^77777 
001222 



000004 
005236 



12^ 
000 
107 
000 
012 

12: 

040 



005234 



005234 



000002 
000004 



015 
015 





BNE 




TYPE 




TST 




MOV 




JMP 


10$: 


CMPB 




BNE 




TST 




BNE 




M0V8 




TYPE 




MOV 


6$: 


DEC 




CMP 




6L0 




MOVB 




TYPE 




BR 


5$: 


TST 




BEQ 




M0V8 




TYPE 




CLR 


7$: 


CMPB 




BNE 




TYPE 




BR 


8$: 


CMPB 




BNE 




CLRB 




TYPE 




TYPE 




BR 


4S: 


TYPE 




BR 


3$: 


MOVB 




TYPE 




CMPB 




BNE 




CLRB 




TYPE 




TST 




MOV 




MOV 




MOV 




MOV 




RT] 


9$: 


,8YTE 




.BYTE 


STiyfN: 


.6LK6 


SCNTLU: 


.ASCJZ 



^2Z 

040 
000 



SCNTLG 

$MSWK: 



.ASCIZ 

•ASCJZ 



10$ 

.SCNTLC 

iSP)* 

(SP)+.R3 

CNTRLC 

#177, (R3) 

5$ 

(SP) 

6$ 

#'\,9$ 

,9$ 

*-1,(SP) 

R3 

R3,*$TTY1N 

4$ 

(R3),9$ 

ii' 

(SP) 
7$ 

#'\,9$ 

.9$ 

(SP> 

M2S,(R3) 

8$ 

,$CNTLU 

1$ 

*22,(R3) 

3$ 

(R3) 

.SCRLF 

-SiTYIN 

^$ 

,$QUES 

1$ 

(R3),9$ 

,9$ 

.fl5,(R3) + 

2$ 

-1(R3) 

,$LF 

(SP)* 

(SP)+, r3 

(SP),-(SP) 

4<SPJ,2(SP) 

/l'$TTYJN,4(SP) 



8. 

/*u/<::><i2> 

/*G/<'15><12> 

<15><1.?>/SWR = / 



BRANCH If NO 

TYPE A CONTnOL-C C^C) 

CLEAN RU80UT KEY OFF OF THE STACK 

RESTORE R3 

GOTO CONTROL-C RESTART 

IS IT A RUeoUT 

BR IF NO 

IS THIS THE FIRST RU80UT? 

BR If NO 

TYPE A BACK SLASH 

SET THE RU80UT KEY 

BACKUP BY ONE 

STACK EMPTY? 

6R IF YES 

SETUP TO TYPEOUT THE DELETED CHAR. 

60 TYPE 

60 READ ANOTHER CHAR. 

RUBOUT KEY SET? 

BR IF NO 

TYPE A BACK SLASH 

CLEAR THE RUBOUT KEY 

IS CHARACTER A CTRL U? 

BR IF NO 

TYPE A CONTROr '\J" 

60 STAPT OVER 

IS CHARACTER A '**R*'? 

BRANCH IF NO 

fLEAR THE CHARACTEP 

TYPE A *tR" & 'IF" 

TYPE THE INPUT STRING 

GO PICK[)P ANOTHER CHACTFR 

TYPE A '?• 

CLEAR THE BUFFER AND LOOP 

ECHO THE CHARACTER 

CHECK FOR RETURN 
LOOP If NOT RETURN 
CLEAR RETURN (THE 15) 
TYPE A LINE FEED 
CLEAN RUBOUT KEY FROM THE STACK 
RES TOR t R3 

ADJUST THE STACK AND PUT ADDRESS OF THE 
FIRST ASCII CHARACTER ON IT 

RrTURN 

■STORAGE FOR ASCII CHAR. TO TYPE 

niRMINATOR 

RESERVE 8 BYTES FOR TTY INPUT 

CONTROL 'V 



;; CONTROL "6' 
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SEQUENCE 47 



00S271 
00527A 
005277 



040 
105 
075 



040 
127 

040 



116 
040 

000 



$HNEW: .ASCJZ / NEW = / 



J 
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SEQUENC'-: 48 



188A 








.S8TTL 


CONTRO 


1885 












1880 005302 


013737 


001232 


001210 


CNTRLC; 


MOV 


1887 005310 


005237 


001210 






INC 


1888 0053U 


104401 


005361 






TyPE 


1389 005320 


113737 


001102 


005^54 




M0V8 


18>^0 005326 


013746 


005354 






MOV 


1891 005332 


104402 








TYPOC 


1892 005334 


10A401 


005356 






TVPE 


1893 005540 


013746 


001210 






MOV 


1894 0053A4 


104405 








TypDS 


'1895 005346 


104407 








GTSWR 


1896 00';350 


000157 


036026 






JMP 


ie^7 005354 


000000 






1$: 


.MORD 


1898 005356 


040 


040 


000 


2$: 


.ASCIZ 


1899 005361 


112 


125 


115 


CMS6: 


.ASCII 


00536^ 


120 


in 


116 






on;>367 


107 


O'tO 


124 






OOS3/2 


117 


OAO 


105 






005375 


116 


104 


040 






005A00 


117 


106 


040 






005A03 


120 


101 


123 






00540^ 


123 


015 


012 






1900 005A11 


l.H 


105 


123 




. ASCIZ 


005A14 


^?^ 


116 


117 






005417 


on 


ipo 


101 






ooy.22 


1-;^ 


123 


116 






005A25 


lT7 


015 


012 






0U5430 


000 











$PASS,$TMP5 

$TMP5 

,CMS6 

$TSTNMJ$ 

1$,"(SP) 

.2$ 
$TMP5,"(SP) 



$E0P+2 

/ / 



GET THE VALUE Of "SPASS" 
FORM CURRENT PASS It 
TYPE THE TEST STOPS HERE 
SAVE TEST NUMBER 
SAVE 1$ FO TYPEOUT 



SAVE $TMP5 FOR TYPEOUT 

TYPE ASCII DECIMAL WITH SIGN 

ASK FOR NEW SWR VALUE 

JUMP TO END OF PASS + 2 

TEST it BUFFER 

2 SPACES & STOP MESSAGE 



/JUMPING TO END OF PASS/<15><12> 



.ASCIZ /TESTNO l^ASSN0/<15><1?> 



1901 



.EVEN 



CKKT800 n/4A 
TYPE ROUTINE 

1903 
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SEQUENCE 49 



005432 
005456 
005440 
005442 
005444 
C05446 
005452 
005460 
005462 
005470 
005472 
005476 
005502 
005504 
005512 
005514 
005516 
005520 
005522 
005524 
005530 
005532 
005536 
005540 
005544 
005546 
005550 
005552 
005554 
005560 
005562 
005566 
005572 
005574 

005600 
005604 
005606 
005o12 
005616 



105737 
100002 
000000 
000430 
010046 
017600 
122737 

coion 

132737 
001405 
010037 
004737 
000000 
13:V37 
001003 
112046 
001005 
005726 
012600 
062716 
000002 
122716 
00143'^ 
122710 
001006 
005726 
104401 
001221 
105037 
000755 
004737 
123726 
001350 
013746 

105366 
002770 
004737 
105337 
000770 



001157 



000002 
000001 



001244 



000100 001245 

005502 
006004 

000040 001245 



000002 
00001 1 
0002UO 

005772 

005644 
001156 

001154 

000001 

005644 
005772 



SBTTL TYPE ROUTINE 

•l^«rllrl^^**4rt)^«lr*«r*llrllr«r*ilr*****ilr****«********it*********«t4*ft*f«tikAt**(k 

^ROUTINE TO TYPE ASCiZ MESSAGE. MESSAGE MUST TERMINATE WITH A BYTE. 
*THE ROUTINE WILL INSERT A NUMBER OF NULL CHARACTERS AFTER A LINE FEED. 



*N0TE1 
*N0TE2 
*N0TE3 



^CALL: 

*1) USING A 

* TYPE 
*0R 

* TYPE 

* MESADR 



$NULL CONTAINS THE CHARACTER TO BE USED AS JHE FILLER CHARACTER 
$FILLS CONTAINS THE NUMBER OF FILLER CHARACTERS REQUIRED. 
SFILLC CONTAINS THE CHARACTER TO FILL AFTER. 



TRAP INSTRU*^- 
,MESADR 



ItYPE: 



1$: 



61$: 
62$: 

2$: 



60$; 
3$: 

4$: 



5$: 
6$: 



7$: 



TliTft 

BPL 

flALT 

BR 

MOV 

MOV 

CMPB 

6NE 

BITB 

BEQ 

MOV 

JSR 

.WORD 

BilB 

fiNE 

M0V6 

BNE 

TST 

MOV 

ADD 

RTI 

rMPB 

BEO 

Cf^F-B 

BNE 

TST 

TYPE 

$CRLF 

CLRB 

BR 

JSR 

CMPB 

BNE 

MOV 



005620 112716 000040 



DEC8 
BLT 
JSR 
DECB 

go 

•HORIZONtIal TAB 
8$: M0V8 



$TPfLG 
1$ 

3$ 

R0,-(SP) 

a2(SP),R0 

MPTENV^SENV 

62$ 

#APTSP00L.$ENVM 

62$ 

R0.61$ 

PC,$ATY3 



*APTCSUP,$ENVM 

60$ 

(RO)S-(SP) 

4$ 

(SP> + 

(SP)^. RO 

ft2ASP) 

MHIASP) 

8$ 

^CRLF.(SP) 

5$ 

(SP) + 



$CHARCNT 

2$ 

PC,$TYPEC 

$FILLC,(SP)+ 

2$ 

$NULL,-(SP) 

KSP) 

6$ 

PC,$TYPEC 

$CHARCNT 

7$ 

PROCESSOR 

#' ,(SP) 



;;MESADR IS URSJ ADDRESS OF AN ASCIZ STRING 



IS THERE A TERMINAL? 

8R IF YES 

HALT HERE IF NO TERMINAL 

LEAVE 

SAVE RO 

GET ADDRESS CF ASCII STRING 

RUNNING IN APT MODE 

NO, 60 CHECK FOR APT CONSOLE 

SPOOL MESSAGE TO APT 

NO, GO CHECK FOR CONSOLE 

SETUP MESSAGE ADDRESS FOR APT 

SPOOL MESSAGE TO APT 

MESSAGE ADDRESS 

APT CONSOLE SUPPRESSED 

YES, SKIP TYPE OUT 

PUSH CHARACTER TO BE TYPED ONTO STACK 

8R IF IT ISN'T THI: TERMINATOR 

IF TERMINATOR POP IT OFF THE STACK 

RESTORE RO 

ADJUST RETURN PC 

HEIUHN 

BRANCH IF <HT> 

BRAWCH IF NOT <CRLF> 

POP <CR><LF> EQUIV 
TYPE A CR AND LF 

CLEAR CHARACTER COUNT 

GET NEXT CHARACTER 

60 TYPE THIS CHARACTER 

IS IT TIME FOR FILLER CHARS.? 

IF NO GO GET NEXT CHAR. 

GET # OF FILLER CHARS. NEEDED 

AND THE NULL CHAR. 

DOES A NULL NEED TO BE TYPED? 

BR IF NO—GO POP THE NULL OFF OF STACK 

GO TYPE A NULL 

DO NOT COUNT AS A COUNT 

LOOP 

REPLACE TAB WITH SPACE 
















L 4 
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. 
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SEQUENCE 50 


TYPE ROUTlf'F 


















00^624 


004737 


005644 




9$: 


JSR 


PC,$TYPEC 


;;TyP£ A SPACE 




005630 


132737 


000007 


005772 




BITB 


/f7,$CHARCNT 


;;8RANCH IF NOT AT 




005636 


001372 








BNE 


9$ 


;;TAB STOP 




0056^0 


C05726 








TST 


(SP)-^ 


;;P0P SPACE OFF STACK 




005642 


0^0724 








BR 


25 


;;6ET NEXT CHARACTER 




0056'!^ 








$TYPEC: 










005644 


105777 


173274 






TSTB 


a$TKS 


;;CHAR IN KY8D BUFFER? 


•MJD001 


005650 


100022 








BPL 


10$ 


;;BR IF NOT 


'MJD001 


005652 


017746 


173270 






MOV 


a$TKB,-(SP) 
*177600,(SP) 


;;GET CHAR 


MJD001 


005656 


042716 


177600 






BIC 


;; STRIP EXTRANEOUS BITS 


MJD001 


005662 


122716 


000023 






CMPB 


nXOFfASP) 


;;WAS CHAR XOFF 


MJD001 


005666 


001012 








BNE 


102$ 


;;BR IF NOT 


MJD001 


005670 








101$: 






■^ ^ 


MJD001 


005670 


105777 


173250 






TSTB 


a$TKS 


;;WAIT FOR CHAR 


MJD001 


005674 


100375 








BPL 


101$ 




MJD001 


005676 


117716 


173244 






M0V8 


a$TK8,(SP) 


;;6ET CHAR 


MJD0U1 


005702 


042716 


177600 






BIC 


#177600, <SP) 


;;STRIP IT 


MJD001 


005706 


122716 


000021 






CMPB 


nXONASP) 


;;WAS IT XON? 


MJD001 


005712 


001366 








BNE 


101$ 


;;BR If NOT 


'MJD001 


00571 A 








102$: 








MJD001 


005714 


005726 








TST 


iSP)-^ 


::fix STACK ; 


MJDOOi 


005716 








10$: 








MJD001 


005716 


105777 


173226 






TSTB 


a$TPs 


;;WAIT UNTIL PRINTER IS READY 




005722 


100375 








BPL 


10$ 




MJDOOI 


005724 


126627 


000002 


000021 




CMP8 


2(SP),#$X0N 


;;IS CHARACTER A RANDOM XON? 


RAN001 


005732 


001420 








BEQ 


$TYPEX 


;;6RANCH If YES 


■RAN001 


005734 


116677 


000002 


173210 




M0V8 


2(sp),a$TPe 


;;LOAD CHAR TO BE TYPED INTO DATA RE6. 




005742 


122766 


000015 


000002 




CMPB 


#CR,2(SP) 


;:IS CHARACTER A CARRIAGE RETUP.N? 




005750 


001003 








BNE 


1$ 


;;BRAfJCH IF NO 




005752 


105037 


005772 






CLR8 


$CHARCNT 


;; YES— CLEAR CHARACTER COl'NT 




005756 


000406 








BR 


$TyPEX 


;;EXIT 




005760 


122766 


000012 


000002 


1$: 


CMPB 


yS'LF.2(SP) 


;;IS CHARACTER A LINE FFcD? 




005766 


001402 








BEQ 


$TYPEX 


;;BRANCH IF YtS 




005770 


105227 








JNC8 


(PC) + 


;; COUNT THE CHARACTER 




005772 


000000 






$CHARCNr:.WQRD 





;; CHARACTER COUNT STORAGl 




005774 


000207 






$TYPEX: 


RTS 


PC 







' 












M 4 


" — 


—^ 
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SEQUENCE 51 




APT COMMUNICATIONS ROUTINE 












1 


1904 








.SSTTL APT COMMUNICATIONS ROUTINE 






005776 


112737 


000001 


006242 


SATYI; M0V8 


*n$FFLG 


•TO REPORT FATAL ERROR 






006004 


112737 


000001 


006240 


$ATY3: MOVB 


*1,$MFLG 


•TO TYPE A MESSAGE 






006012 


000403 






BR 


$ATYC 








006014 


112737 


000001 


006242 


$ATY4: Move 


/'1,$FFLG 


•TO ONLY REPORT FATAL ERROR 


i 




006022 








$ATYC: 










006022 


010046 






MOV 


RO,"(SP) 


PUSH RO O.N STACK 






006024 


010146 






MOV 


R1,-(SP) 


PUSH R1 ON STACK 






006026 


105737 


006240 




TSTB 


$MFLG 


SHOULD TYPE A MESSAGE? 






006032 


001450 






BEO 


5$ 


U NOT: BR 






006034 


122737 


000001 


001244 


CMP8 


^SfAPTENV.SENV 


OPERATING UNDER APT? 






006042 


001031 






BNE 


3$ 


^U NOT: BR 






006044 


132737 


000100 


001245 


BITB 


#APTSPOOL,$ENVM ; 


•SHOULD SPOOL MESSAGES? 






006052 


001425 






BEQ 


3$ 


^U NOT: BR 






006054 


017600 


000004 




MOV 


a4(SP),R0 


•GET MESSAGE ADDR. 






006060 


062766 


000002 


000004 


ADD 


/'2,4(SP) 


;;8IJMP RETURN' ADDR. 






006066 


005737 


001224 




1$: TST 


$MSGTYPE 


■SEE IF DONE W/ LAST XMISSION? 






006072 


001375 






BNE 


1$ 


U NOT: WAIT 






006074 


010037 


001240 




MOV 


RO,$«SGAD 
(R0) + 


•PUT ADDR IN MAILBOX 






006100 


105720 






2$: TST8 


•FIND END OF MESSAGE 






006102 


001376 






BNE 


2$ 








006104 


163700 


001240 




SUB 


$MS6AD,R0 


•SUB STAR! OF MESSAGE 






006110 


006200 






ASR 


RO 


•GET MESSAGE LNGTH IH WORDS 






006112 


010037 


001242 




MOV 


R0,$MSGL6T 


PUT LENGTH IN MAILBOX 






006116 


012737 


000004 


001224 


MOV 


M,$«SGTYPE 


■TELL APT TO TAKE MS6. 






006124 


000413 






BR 


5$ 








006126 


017637 


000004 


006152 


3$: MOV 


a4(SP),4$ 


•PUT MS6 ADDR IN JSR LINK..GE 






006134 


062766 


000002 


000004 


ADD 


/f2,4(SP) 


;;8UMP RETURN ADDRESS 






006142 


013746 


177776 




MOV 


177776. -(SP) 


•PUSH 1//'776 ON STACK 






006146 


004737 


005432 




JSR 


PC,$TYPE 


'CALL TYPE MACRO 






006152 


000000 






4$; .WORD 











006154 








5$: 










006154 


105737 


006242 




10$: rST8 


$FF LG 


•SHOULD REPORT FATAL ERROR? 






006160 


001416 






BEO 


12$ 


'U NOT: BR 






006162 


005737 


001244 




TST 


$ENV 


•RUNNING U.'4DER APT? 






006166 


001413 






BEO 


12$ 


It NOT: BR 






006170 


005737 


001224 




11$: TST 


tMSGTYPE 


FINISHED LAST MESSAGE? 






006174 


001375 






BNE 


11$ 


\^ NOT: WAIT 






006176 


017637 


000004 


001226 


MOV 


a4(SP).$FATAL 


■GET ERROR # 






006204 


062766 


000002 


000004 


ADD 


#2,4(SP) 


;;8UMP RETURN ADDR. 






006212 


005237 


001224 




JNC 


$MSGTYPE 


TELL APT TO TAKE ERROR 






006216 


105037 


006242 




12$: CLR6 


$FFl.G 


•CLEAR FATAL FLAG 






006222 


105037 


006241 




CLRB 


$LFLG 


CLEAR LOG FLAG 






006226 


105037 


006240 




CLR8 


$HFLG 


CLEAR MESSAGE FLAG 






006232 


012601 






MOV 


(SP)*. R1 


POP STACK INTO R1 






006234 


012600 






MOV 


(SP) +,R0 


'^OP STACK INTO RO 






006236 


000207 






RTS 


PC 


RETURN 






006240 


000 






fMFLG: .8YTE 





MESSG, FLAG 






006241 


000 






$LFLG; .BYTE 





LOG FLAG 






006242 


000 

000200 
OOOOC 
000100 
000040 






$FFLG: .BYTE 
.EVEN 
APTSIZF=200 
APTENV=001 
APTSPOOL^IOO 
APTCSUP=040 





FATAL FLAG 





CKKTBDO 11/A^ MEM M6MT 


PRT B MACRO Ml 


BINARY TO ASCII 


AND TYPE ROUTINE 


1905 






0062AA 


010U6 




0062A6 


016601 


000006 


006252 


000261 




00625A 


112737 


000060 006316 


006262 


006101 




00626A 


00U06 




006266 


105537 


006316 


006272 


10AA01 


006316 


006276 


000241 




006300 


000765 




006302 


012601 




C0630A 


016666 


000002 000004 


006312 


012616 




0063U 


000002 




006316 


000 


000 
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SEQUENCE 52 



.SBTTL BINARY 

;»THIS ROUTINE 

;*BINARy-ASCII 

;*CALL: 

; * MOV 

TYPBN 

MOV 

MOV 

SEC 

MOVB 

ROL 

6E0 

ADCB 

TYPE 

CLC 

BR 

MOV 

MOV 

MOV 

RTI 

.BYTE 



TO ASCII AND TYPE ROUTINE 



*1tif 



IS USED TO CHANGE A 16-8IT BINARY NUMBER TO A ■|6-8IT 
NUMBER AND TYPE IT, 



$TYP8N: 



1$: 



2$: 



$81 N: 



NUMBER, "(SP) 

R1, -(SP) 
6(SP),R1 

#'0,$BIN 

R1 

2$ 

$BIN 

.$8IN 

U 

(SP)+.R1 
2(SP),4(SP) 
(SP)+, (SP) 

0,0 



OF 



THE NUMBER OF BITS 



NUMBER TO BE TYPED 

TYPE IT 

SAVE R1 ON THE STACK 

GET THE INPUT NUMBER 

SET "C" SO CAN KEEP T^^ACK 

SET CHARACTER TO AN ASCli 

GET THIS BIT 

DONE / 

NO— SET THE CflARACTCR EQUAL TO THIS BIT 

GO TYPE THIS BIT 

cilVr^ "C" SO CAN KEEP TRACK OF BITS 

60 DO THE NEXT BIT 

POP THE STACK INTO R1 

ADJUST THE STACK 



;;RETURN TO USER 
;; STORAGE FOR ASCII 



CHAR. AND TERMINATOR 



CKKTBDO 11/4A MEM MGMT PRT B MACRO M1113 
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SEQUENCE 53 



1906 



006320 
006324 
006332 
006336 
00634Z 
006344 
006352 
006360 
006366 
006370 
OOo^"^? 
006 ' 4 
006400 
006402 
006406 
006412 
006416 
006422 
006424 
006426 
006430 
006432 
006434 
006436 
006440 
006442 
006446 
006450 
006454 
006456 
006460 
006462 
006464 
006470 



017646 
11663/ 
112637 
062716 
000406 
112737 
112737 
112737 
010346 
010446 
010546 
113704 
005404 
062704 
110437 
113704 
016605 
005003 
006105 
000404 
006105 
006105 
006105 
010503 
006103 
105337 
100016 
042703 
001002 
005704 
00^403 
005204 
052703 
052703 



000000 

000001 006543 

00654S 

00U002 



000001 
000006 
000005 



006545 

000006 
006544 
006543 
000012 



006543 
00654S 
006542 



006544 
177770 



000060 
000040 



.SBTTL BINARY TO OCTAL (ASCII) AND TYPE 

; ***********,^******)t* + ***tttw**t* *********************** ******T/ 

*THIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A 6-HGIT 

-OCTAL (ASCII) NUMBER AMD TYPE iT. 

*$TYPOS— ENTER HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE 

*CALL: 



MOV 
TYPOS 
.HYTE 
.BYTE 



NUM.-(SP) 

N 
M 



;NUMBER TO BE TYPED 

.CALL FOR TYPEOUT 

;N-1 TO 6 FOR NUMBER OF DIGITS TO TYPE 

;M=^1 OR 

;;1=T^PE LEADING ZEROS 
;;0=SUPPRESS LEADING ZEROS 



."NU'^ER TO BE TYPED 
;CALL FOR TYPEOUT 



* 

t 
n 

■k 
H 

n 

*$TYPON ENTER HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST 

*$TYPOS OR STYPUC 
*CALL: 

* MOV NUM,"(SP) 

• TYPON 



*$TYPOC ENTER 

*CALL: 

* MOV 

* fYPOC 
STYPOS: MOV 

MOVB 

MOVB 

ADD 

BR 
SfYPOC: MOVB 

MOVB 
STYPON: MOVB 

MOV 

MOV 

MOV 

MOVB 

NEG 

ADD 

MOVB 

MOVB 

MOV 

CLR 
1$: ROL 

BR 
2$: ROL 

ROL 

ROL 

MOV 
3$: ROL 

DECS 

BPL 

8IC 

8NE 

TST 

6EQ 
4$: INC 

BIS 
5$: BIS 



HERE FOR TYPEOUT OF A 16 BIT NUMBER 



rJUM."(SP) 

S(SP),-(SP) 
1(SP),$0FILL 
(SP)*, $0M0DE+1 
02, (SP) 

♦lYPON 

#1,$0Ml.L 

jf6.$ciuni 1 

#5,$GiNT 

R3,-(SH; 

R4, -(SP) 

R'i.-(SP) 

$0M0DE+1,R4 

R4 

*6,R4 

R4,$0M0DE 

$0nLL,R4 

12(SP),R5 

R3 

R5 

3$ 

R5 

R5 

R5 

R5,R3 

R3 

SOMODE 

7$ 

*1 77770, R5 

4$ 

R4 

5$ 

R4 

#'0,R3 

M' ,R3 



Nl»*«ER TO BE TYPED 
CmLL FOR TYPEOUT 
PICKUP THE MODE 
LOAD ZERO FILL SWITCH 
NUMBER or DIGITS TO TYPE 
ADJUST RETURN ADDRESS 



SET THE 
SET FOR 
SET THE 
SAVE R5 
SAVE R4 
SAVE R5 
GET THE 



ZERO FILL SWITCH 
SIX(6) DIGITS 
ITERATION COUNT 



NUMBER OF DIGITS TO TYPE 



SUBTRACT ;T FOR MAX. ALLOWED 

SAVE IT FOR USE 

GET THE ZERO FILL SWITCH 

PICKUP THE INPUT NUMBER 

CLEAR THE OUTPUT WURD 

ROTATE MSB INTO "C*' 

GO DO MSB 

FORM THIS DIGIT 



GET LSS OF THIS DIGIT 
TYPE THIS DIGIT? 
BR IF NO 
GET RID OF JUNK 
TEST FOR 
SUPPRESS THIS 0? 

no rr VpQ 

DON'T SUPPRESS ANYMORE O'S 
MAKE THIS DIGIT ASCII 
MAKE ASCII IF NOT ALREADY 
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SEQUENCE 54 



00647A 
006500 
00650<. 
006510 
006512 
0065U 
006516 
006520 
006522 
00652A 
006526 
006534 
006536 
006540 
006541 
006542 
006543 
006544 



110337 

104401 

105337 

003347 

002402 

005204 

000744 

012605 

012604 

012603 

016666 

012616 

000002 

000 

000 

000 

000 

000000 



006540 
006540 
006542 



000002 000004 





MOVB 




TYPE 


7$: 


DECB 




BGT 




BLT 




INC 




BR 


6$: 


MOV 




MOV 




MOV 




MOV 




MOV 




RTi 


8$: 


.BYTE 




.BYTE 


$0CNT: 


.BYTE 


SOFILL: 


.BYTE 


$0M0DE ; 


.WORD 



R3-8$ 

ioCNT 
2$ 

6$ 

R4 

2$ 

(SP)+, R5 

(SP)+,R4 

(SP)+,R3 

2(SP),4(SP) 

(SP)+, (SP) 









SAVE FOR TYPING 

GO TYPE THIS DIGIT 

COUNT BY 1 

BR If MORE TO DO 

BR IF DONE 

INSURE LAST DIGIT ISN'T A BLANK 

60 DO THE LAST DIGIT 

RESTORE R5 

RESTORE R4 

RESTORE R3 

SET THE STACK FOR RETURNING 

RETURN 

STORAGE FOR ASCII DIGIT 

TERMINATOR FOR TYPE ROUTINE 

OCTAL DIGIT COUNTER 

ZERO FILL SWITCH 

NUMBER OF DIGITS TO TYPE 



r 

J 



L. 
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SEQUENCE 55 



1907 



0065^*6 
006S46 
006550 
006552 
00655A 
0065^6 
006560 
00656^ 
006570 
006572 
0065?^ 
00660,? 
00660A 
006610 
006614 
006616 
00662*:' 
006624 
006626 
006630 
006632 
006634 
006636 
006640 
006642 
0066^4 
006646 
006650 
006656 
006662 
006666 
006670 
006672 
006676 
006700 
006702 
006704 
006706 
006710 
006712 
0067:0 
006722 
006724 
006726 
006/30 
006732 
006734 



010046 
010146 
010246 
010346 
010546 
012746 
01660S 
10000^ 
00540S 
112/66 
005000 
012703 
112723 
OOS002 
016001 
160101) 
002407 
005P02 
000774 
060105 
005 702 
001002 
105716 
100407 
106316 
103005 
116663 
052702 
052702 
110223 
005720 
020027 
002746 
003002 
010502 
00076a 
105726 
100003 
116663 
10S)13 
0V605 
012603 
012602 
012601 
012600 
104401 



SBTTl. CONVERT BINARY TO DECIMAL AND TYPE ROUTINE 



*THIS ROUTINE IS USED TO CHANGE 
♦SIGNED DECIHAL (ASCII) NUMBER 
•NUMBER IS POSITIVE OR NEGATIVE 
-BEFORE THE FIRST DIGIT OF THE 
♦REPLACED WITH SPACES. 
*CALL; 

NUM,-(SP) 



$TVPDS: 



0^0^00 
000020 



000055 000001 

006762 
000040 

00675? 



000001 
OCOCiiO 
000040 



000010 



?77?7 



1$: 



2$: 
5$: 



4$: 



5$: 



6$; 
7$: 



\77777 177776 



8$: 



9$: 



006762 



MOV 
TYPDS 

ilOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
BPL 
NEG 

Move 

CLR 

MOV 

MOVfi 

CLR 

MOV 

sue 

BLT 

INC 

BR 

ADD 

TST 

BNc 

TSTQ 

BMJ 

ASLB 

BCC 

M0V8 

BIS 

BIS 

M0V8 

TST 

CMP 

BLT 

BGT 

MOV 

BR 

TST8 

BPL 

MOVB 

CLR6 

MOV 

MOV 

MOV 

MOV 

MOV 

TYPE 



RO,"(SP) 

Rl, -(SP) 

R2,-(SP) 

R3,-(SP) 

R5,"(SP) 

*20200,"(SP) 

20(SP),R5 

1$ 

R5 

.»'-J{SP) 

RO 

#$D01K,R3 

** ,(R3)+ 

R2 

$DTeL(RO).Rl 

R1,R5 

4$ 

R2 

3$ 

R1,R5 

R2 

5$ 

(SP) 

7% 

(SP) 

6$ 

1(SP),-1(R3) 

0' ,R2 

R2,(R3)+ 

(R0) + 

RO.^IO 

2% 

8% 

R5,R2 

6S 

(SP)> 

9$ 

-1(SP),"2(R3) 

(R3) 

(SP)*,R5 

(SP)*.R3 

(SP)+,R2 

(SP)+,R1 

(SP)*,RO 

,$D8LK 



A 16-aiT BINARY NUMBER TO A 5-DIGIT 
AND jyPE IT. DEPENDING ON WHETHER THE 

A SPACE OR A MINI'S SIGN WILL BE TYPED 
NUMBER. LEADING ZEROS WILL ALWAYS BE 



;PUT THE BINARY NUMBER ON THE STACK 
;60 TO THE ROUTINE 



PUSH 


RO 


ON 


STACK 




PUSH 


R1 


ON 


STACK 




PUSH 


R2 


ON 


STACK 




PUSH 


R3 


ON 


STACK 




PUSH 


R5 


ON 


STACK 




SET BLANK SWITCH 


AND 


GET 


THE 


INPUT NUMBER 



SIGN 



BR IF INPUT IS POS. 

MAKE THE BINARY NUMBER POS. 

MAKE THE ASCII NUMBER NEG. 

2EH0 THE CONSTANTS INDEX 

SETUP THE OUTPUT POINTER 

SET THE FIRST CHARACTER TO A BLANK 

CLEAR THE BCD NUMBER 

GE^ THE CONSTANT 

FORM THIS BCD DIGIT 

BR IF DONE 

INCREASE THE BCD DIGIT BY 1 

ADD BACK THE CONSTANT 
CHECK IF BCD DIGIT=0 
FALL THROUGH IF C 
STILL DOING LEADING O'S? 
BR IF YES 
MS..? 

BR IF m 

YES— SET THE SIGN 
MAKE THE BCD DIGIT 
MAKE IT A SPACE IF 
PUT THIS CHARACTER 
JUST INCREMENTING 
CHECK THE TABLE INDEX 
GO DO THE NEXT DIGIT 
GO TO EXIT 
GET THE LSD 
GO CHANGE TO ASCII 
WAS THE LSD THE FIRST NON-ZERO? 
BR IF NO 

YES—SET THE SIGN FOR TYPING 
SET THE TERMINATOR 
STACK INTO R5 

INTO 

INTO 

INTO 

INTO 



ASCII 

NOT ALREADY A DIGIT 

IN THE OUTPUT BUFFER 



POP 
POP 
POP 
POP 
POP 
NOW 



STACK 
STACK 
STACK 
STACK 
TYPE THE NUMBER 



R3 
R2 
R1 
RO 



CKKTBDO 


11 /AA MEM MGMT 


PRT 





MA' 


:ro Min3 ^2 


CONVERT 


BINARY 


TO DECIMAL 


AND ' 


'YPE 


ROUTINE 




006740 


016666 


000002 


000004 






0067A6 


012616 














006750 


000002 














00675? 


023A20 










$DT8L: 




00675A 


001750 














006756 


OOOUA 














006760 


000012 














006762 












$D8U: 



E 5 
12-JAN-82 12:19 PAGE 47-1 SEQUENCE 56 

MOV 2(SP),A(SP) ;;ADwlUST THE STACK 

MOV (SP)+,(SP) 

RTI ;;ft£TURN TO USER 

10000. 

1000. 

100. 

10. 

.8LKW 4 



.J 



.J 
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SEQUENCE 57 



1908 



006772 
006772 
00677A 
006^7 f 
00:^000 
007002 
007004 
007006 
007012 
007016 
00702? 
00V026 



007030 
007030 
0O70,?4 
0070AO 
00^044 
007050 
007052 
007054 
007056 
007060 
007062 
007064 



010046 
010146 
010246 
010346 
010446 
010546 
016646 
016646 

01664O 
016646 
000002 



012666 
012666 
012666 
012666 
012605 
012604 
012603 
012602 
012601 
012600 
000002 



000022 
000022 
000022 
000022 



000022 
000022 
000022 
000022 



S8TTL SAVE AND RESTORE R0-R5 ROUTINES 

;*♦♦*■»**********************«■* **H;**;*****ii***************-V******* 

hSAVE R0-R5 

*CALL: 

* SAVREG 

*UPON RETURN FROM $SAVRE6 THE STACK WILL LOOK LIKE: 
* 

*TCP ( + 16) 

* +2 (+18) 

* +4 — R5 

* +6— R4 

* +8"— R3 

* + 10 R2 

* + 12— R1 
*+14 — RO 

SSAVREG: 

MOV R0,-(SP: ;;PUSH RO ON STACK 

MOV R1,-(5;^) ;;PUSH R1 ON STACK 

MOV R2,-(SP) ;;PUSH K2 ON STACK 

MOV R3, -(SP) ;;PUSH R3 ON STACK 

MOV R4,-(SP) ;;PUSH R4 ON STACK 

MOV R5, -(SP) ;;PUSH R5 ON STACK 

MOV 22iSP),-iSP) ;;SAVE PS OF MAIN FLOW 

MOV 22(SP), -(SP) ;;SAVE PC OF MAIN FLOW 

MOV 22(SP),-(SP) ;;SAVE PS OF CALL 

MOV 22(SP), -(SP) ;;SAVE PC OF CALL 
RTI 

;*RESTORE R0-R5 

;*CALL: 

;* RESREG 

3^VLSREG; 

MOV (SP)+,22(SP) 

MOV (SP)+,22(SP) 

MOV (SP)+,22(SP) 

MOV (SP)+,22(SP) 

MOV (SP)*,R5 

MOV (SP)+, R4 

MOV (SP)+,R3 

MOV (SP)+, R2 

MOV (SP)+. R1 

MOV (SP)+, RO 
RTI 



RESTORE PC OF CALL 
RESTORE PS OF CALL 
RESTORE PC OF MAIN FLOW 
RESTORE PS OF MAIN FLOW 
POP STACK INTO R5 
POP STACK INTO R4 
POP STACK INTO R3 
POP STACK INTO R2 
POP STACK INTO R1 
POP STACK INTO RO 
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SEQUENCE 58 



007066 
00/0/0 
007074 
007100 
007104 
007110 
007112 
007114 
007116 
007120 
007122 
007; 24 
007126 
007130 
007132 
007136 
007140 
007K2 
007144 
007146 
007150 
007152 
007154 
007156 
007160 
007162 
007166 
007170 



104413 
016601 
012705 
012704 
012703 
012100 
012101 
005002 
110245 
010002 
005304 
003007 
001405 
005205 
010566 
104414 
000207 
006203 
006001 
006000 
006001 
006000 
006001 
006000 
040302 
062702 
000753 



DOUBLE LENGTH BINARY TO OCTAL ASCII CONVERT ROUTINE 



-SBTTL 

;*THIS 
;*UNSI' 
;*CALL 



ROUTINE WILL CONVERT A 32-8IT UNSIGNED BINARY NUMBER TO AN 
GNED OCTAL ASCIZ NUMBER. 



000002 
007205 
000014 
177770 



;* 

• * 

iDB20: 



1$; 



000002 



2$: 

3$: 



000060 



SOCTVL 



MOV 

JSR 

RETURN 

SAVREG 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

CLR 

MOVB 

MOV 

DEC 

BGT 

BEO 

INC 

MOV 

RESREG 

RTS 

ASR 

ROR 

ROR 

ROR 

ROR 

ROR 

ROR 

BIC 

ADD 

BR 

• 8LK8 



J»PNTR,-(SP) 



2(SP), R1 

^$0CTVL+13.,R5 

*12.,R4 

**C7, R3 

(R1)+,R0 

(R1)+,R1 

R2 

R2,-(R5) 

R0,R2 

R4 

3$ 

2$ 

R5 

R5,2<SP) 

PC 

R3 

R1 

RO 

R1 

RO 

R1 

RO 

R3,R2 

*'0,R2 

1$ 

14. 



POINTER TO LOW WORD OF BiNARY NUMBER 
CALL THE ROUTINE 

THE ADDRESS OF THE flRST ASCII CHAR. IS ON THE STACK 
SAVE ALL REGISTERS 
PUKUP THE POINTER TO LOW WORD 
POimER TO DATA TABLE 
DO ELEVEN CHARACTERS 
MASK 

LOWER WORD 
HIGH WORD 
TERMINATOR 

PUT CHARACTER IN DATA TABLE 
GET THIS DIGIT 
COUNT THIS CHARACTER 
8R If NOT THE LAST DIGIT 
BR IF IT IS THE LAST DIGIT 
ALL DIGITS UONE-ADJUST POINTER FOR KiPST 
ASCI2 CHAR, g PUT IT ON THE STACK 
RESTORE ALL REGISTERS 
RETURN TO USER 

POSITION THE MASK FOR THE LAST DIGIT 
POSITION THE BINARY NUMBER FOR 
THfc NEXT OCTAL DIGIT 



MASK OUT ALL JUNK 

MAKE THIS CHAR. ASCII 

60 PUT IT IN THE DATA TABLE 

RESERVE DATA TABLE 
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007206 
007210 
0072 U 
007216 
007220 
007222 
007226 

007230 
007232 
0072A0 



007242 
0072A4 
007246 
007250 
00/252 
007254 
007256 
007260 
007262 
007264 
007266 
007270 
00727c; 



010046 
016600 
001^740 
111000 
006300 
016000 
000200 

011646 
016666 
000002 



007230 
005432 
006344 
006320 
006360 
006^46 
006244 
0043S6 

004:^:!.'. 

004ojU 
004 760 
006772 
007030 



■SBTTL TRAP DECODER 



;*THJS ROUTINE WILL PICKUP THE LOWER BYTE OF THE 
;*AND USE IT TO INDEX THROUGH THE TRAP T/'8LE FOR 
;*0F THE DESIRED ROUTINE. THEN USING THf! ADDRESS 
;*60 TO THAT ROUTINE. 



"TRAP'^ INSTRUCTION 
THE STARTING ADDRESS 
OBTAINED IT WILL 



000002 



007242 



STRAP: 



000004 000002 



;;THIS 
$TRAP2: 



MOV R0,-(SP) 

MOV 2(SP), RO 

TST -(RO) 

MOVB (RO),RO 

ASL RO 

MOV $TRPAD(RO),RO 

RTS RO 

IS USE TO HANDLE THE 

MOV (SP),"(SP) 

MOV 4(SP),2(SP) 



1 1 



RTI 
.SBTTL TRAP TABLE 
;*THIS TABLE CONTAINS THE STARTING 
;*By THE "TRAP" INSTRUCTION. 

ROUTINE 



;SAVE RO 

;GEr TRAP ADDRESS 
;BACKUP BY 2 
;Gf " RIGHT BYTE OF TRAP 
;PU^niON FOR INDEXING 
;INDtX TO TABLE 
;G0 TO ROUTINE 
'GETPRI" MACRO 

;MOVE THE PC DOWN 
;MOVE THE PSW DOWN 
.•RESTORE THE PSW 



ADDRESSES OF THE ROUTINES CALLED 



iTRPAD: .WORD 
$TYPE 
STYPOC 
STYPOS 
STYPON 
STYPDS 
STYPBN 
SGTSWR 
SCKSWR 
SRDCHR 
SRDLIN 
$-SAVREG 
SRfcSREG 



$TRAP2 

CALL=TYPE TRAP+1 (104401) TTY TYPEOUT ROUTINE 

CALL=TYPOC TRAP+2(104402) TYPE OCTAL NUMBER (WITH LEADING ZEROS) 

CALL=TYPOS TRAP+3( 104403) TYPE OCTAL NUMBER (NO LEADING ZEROS) 

CALL=TYPON TRAP^4(104404) TYPE OCTAL NUMBER (AS PER LAST CALL) 

CALL=TYPDS TRAP+5( 104405) TYPE DECIMAL NUMBER (WITH SIGN) 

CALL=:TYPBN TRAP+6(104406) TYPE BINARY (ASCII) NUMBER 

CALL=GTSWR TRAP+7(104407) GET SOFT-SWR SETTING 

CALL=CICSWR TRAP+10(104410) TEST FOR CHANGE IN SOFT-SWR 

CALL=RDCHR TRAP+ll (104411) TTY TYPEIN CHARACTER ROUTINE 

CALL^RDLIN TRAP+12(104412) TTY TYPEIN STRING ROUTINE 

CALL=?AVREG TRAP+13(104413) SAVE R0-R5 ROUTINE 

CALL=RESRE6 TRAP+14(104414) RESTORE R0-R5 ROUTINE 
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SEQUENCE 60 


POWER DOWN AND 


UP ROUTINES 














1911 








.S8TTL 


POWER 


)0WN AND UP ROUTINES 












•;*«i^*«r***i^«4^**:V**tfrv4^****t**ttllrt«ri^tit*itilrikilr**«ilnlr*itA'«^l^AAitr*]^A*lt«*ft 












:POWE» 


DOWN ROUTINE 






00727A 


012737 


007452 


000024 


JPWRDN: 


MOV 


jS^$ILLUP,d*PWRVEC 


;;SET FOR FAST UP 




007302 


012737 


000340 


000026 




MOV 


*340,a*PWRVEC+2 


•;PRI0:7 




00/310 


010046 








MOV 


RO.-(SP) 


■;PUSH RO ON STACK 




007312 


010146 








MOV 


R1, -(SP) 


•;PUSH R1 ON STACK 


. 


C0731A 


010246 








MOV 


R2,*(SP) 


•;PUSH R2 ON STACK 




007316 


(■J0346 








MOV 


R3,-(SP) 


:;PUSH R3 ON STACK 




007320 


010446 








MOV 


R4, "(SP) 


•;PUSH R4 ON STACK 




007322 


010546 








MOV 


R5,"(SP) 


•;PUSH R5 ON STACK 




00732A 


01 7746 


171610 






MOV 


aSWR,"(SP) 


■;PUSH aSWR ON STACK 




007330 


010637 


007456 






MOV 


SP,$SAVR6 


•;SAVE SP 




007334 


012737 


007346 


000024 




MOV 


/VSPWRUP^ajCPWRVEC 


;;SET UP VECTOR 




007342 


000000 








HALT 








007344 


000776 








BR 


.-2 


•;HANG UP 












;; •^*****«i^*********)^iir«r4***i^*i^A**««lrikik*4i^**iki^*i^*i^***i^**i^**i^i^]^)^i^)^*)V* 












•POWER 


UP ROUTINE 






007346 


012737 


007452 


000024 


SPWRUP: 


MOV 


#^ILLUP,a#PWRVEC 


;;SET FOR FAST DOWN 




00735/. 


013706 


007456 






MOV 


$SAVR6,SP 


•;GET SP 




007360 


005037 


007456 






CLR 


$SAVR6 


•;WAIT LOOP FOR THE TTY 




007364 


005237 


007456 




1$; 


INC 


$SAVR6 


•;WAIT FOR THE INC 




007370 


001375 








PNE 


1$ 


•;0F WORD 




007372 


012677 


171542 






MOV 


<SP)+,aSWR 


•;POP STACK INTO aSWR 




007376 


012605 








MOV 


(5p}»-,r: 


-;POP STACK INTO R5 




007400 


012604 








MOV 


^SP)+,R4 


•;POP STACK INTO R4 




007402 


012603 








MOV 


(SP)+,R3 


•;POP STACK INTO R3 




007404 


012602 








my 


(SP>+,R2 


'.■POP STACK INTO R2 




007406 


012601 








MOV 


(SP)+. Rl 


•;POP STACK INTO HI 




007410 


012600 








MOV 


<SP>+, RO 


';POP STACK INTO RO 




007412 


012737 


007274 


000024 




MOV 


^SPWRDN,a#PWRVEC 


;;SE^ UP THE POWER DOWN VECTOR 




007420 


012737 


000340 


000026 




MOV 


j!f340,a#PWRVEC+2 . 


•;PRIO::' 




007426 


104401 








TypE 




;REPORT THE POWER FAILURE 




007430 


007460 






$PWRMG: 


.WORD 


PWRMSG ; 


;POWER FAfL MESSAGE POINTER 




007432 


012716 








MOV 


(PC)+,(SP) 


;RESTART AT START 




007434 


020000 






SPWRAD; 


.WORD 


START 


;RES1ART ADDRESS 




007436 


042766 


000020 


000002 




BIC 


^20.2(SP) 


;CLEAR '7" BIT 


i 


007444 


005037 


001310 






CLR 


$T8IT 


;CLEAR THE **T" BIT FLAG 




007450 


000002 








RTI 








007452 


000000 






$ILLUP: 


HALT 




;THE POWER UP SEQUENCE WAS STARTED 




007454 


000776 








BR 


.-2 ; 


; BEFORE THE POWER DOWN WAS COMPLETE 




007456 


000000 






$SAVR6: 







:PUT THE SP HERE 




1912 007460 
007463 
007466 


012 
120 
105 


015 
117 
122 


040 
127 
040 


PWRMS6: 


.ASCI2 


<12><15>? POWER f^AILURE - RESTARTING ?<12><15> 


i 










1 
1 


007471 


106 


101 


111 












007474 


114 


125 


122 












007477 


105 


040 


055 










1 


007502 


040 


122 


105 










1 


007505 


123 


124 


101 










I 


007510 


122 


124 


111 










1 


007513 


116 


107 


040 










i 


007516 


012 


015 


000 










i 



1913 



.EVEN 
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1915 








1916 








1917 007522 


125 


116 


105 


1918 007562 


125 


116 


105 


1919 007631 


115 


105 


115 


1920 007701 


101 


103 


103 


1921 007750 


123 


122 


060 


1922 010022 


123 


122 


062 


1923 010073 


120 


101 


107 


192A 010154 


120 


101 


107 


1925 010237 


123 


122 


060 


1926 010515 


123 


122 


060 


1927 010362 


123 


122 


060 


■!928 010431 


123 


122 


062 


1929 01046A 


104 


111 


104 


1930 010523 


115 


124 


040 


1931 010570 


123 


122 


060 


1932 010636 


105 


122 


122 


1933 010713 


115 


106 


120 


1934 010756 


11!) 


124 


120 


1935 011021 


123 


124 


101 


1936 011057 


113 


105 


122 


1937 011135 


115 


056 


115 


1938 011216 


111 


114 


114 


1939 011252 


123 


122 


060 


1940 011327 


120 


123 


127 


1941 011372 


101 


102 


117 


1942 011457 


104 


040 


123 


1943 011523 


111 


116 


103 


1944 011566 


124 


122 


111 


1045 011633 


127 


122 


117 


1946 011701 


111 


114 


114 


1947 011740 


103 


123 


115 


1948 012002 


105 


123 


115 


1949 012041 


103 


123 


115 


1950 012070 


103 


123 


115 


1951 012126 


103 


123 


115 


1952 012152 


103 


123 


115 


1953 012217 


103 


123 


115 


1954 012263 


105 


123 


115 


1955 012327 


103 


123 


115 


1956 012413 


103 


123 


115 


195^ 0124(^6 


123 


122 


062 


rv58 012545 


10'. 


il7 


105 


1959 01262S 


124 


110 


105 


1960 









■SBTTL 



EMI: 
EM2: 
EM10 
EMU 
EMI 2 
EMU 
EMU 
EMI 5 
EMI 6 
£,■-21 
EM2? 
n23 

:m2; 

EM25 
EM26 
EM27 
EM30 
EM31 
EM32 
EMJi 
fcM34 
EM55 
EM56 
EM37 
EM40 
EM41 
fcM42 
EM43 
EM44 
EM45 
EM46 
EM47 
EM50 
EM51 
EM52 
EM55 
lM54 
EM55 
EM56 
tM57 
FM5G 



ERROR 
.NLJS 
.ASCI 
.ASCI 

.A5CJ 
.ASCI 
.ASCI 
.ASCI 
.ASCI 

■ ASCJ 
.ASCI 
,ASCJ 
.ASCJ 
.ASCI 
.ASCI 
.ASCI 

■ ASCI 
.ASCJ 
.ASCJ 
.ASCJ 
.ASCJ 
-ASCI 
.ASCI 
.ASCI 
.ASCI 
.ASCI 
-ASCI 
.ASCI 
.ASCI 
-ASCI 
.ASCI 
.ASCI 
.ASCI 
.ASCJ 
.ASCI 
.ASCI 
.ASCI 
.AStI 
.ASCI 
.ASCI 
.ASCI 
.AStJ 
.ASCI 
.ASCI 
.(^VEN 



MESSAGES, DATA HEADERS-TABLES I FORMATS 
T BCX 

2 /UNEXPECTED CPU TRAP TO LOC. 004/ 
Z /UNEXPECTED MEM. MGMT. TRAP TO LOC. 250/ 
I /MEMORY MGMT. ACCESS ABORT DID NOT OCCUR/ 
Z /ACCESS ERROR DID NOT ABORT INSTRUCTION/ 
Z /SRO DID NOT REPORT ACCESS ERROR CORRECTLY/ 
Z /SR2 DID NOT LOCKUP CORRECT VIRTUAL ADDR./ 
Z /PAGE LGTH. ABORT OCCURRED WHEN IT SHOULDN'T HAVE/ 
Z /PAGE LGTH. ABORT DID NOT OCCUR WHEN 11 SHOULD HAVE/ 
Z /SRO DID NOT REPORT PAGE LGTH. ABORT CORRECTLY/ 
Z /SRO OR SR2 CHANGED BY A SECOND ABORT/' 
Z /SRO OR SR2 WERE NOT '-RESET" BY A RESET/ 
Z /SRi NOT TRACKING CORRECTLY/ 
Z /DID NOT TRAP THRU KERNEL SPACE/ 
Z /KT ERROR SERVICED ON ODD ADDR. ERROR/ 
Z /SRO OR SR2 CHANGED BY ODD ADDR. ERROR/ 
Z /ERROR DURING "DOUBL: ERROR" (KT & ODD ADDR.)/ 
Z /MFPI INSTRUCTION PUSHED WRONG DATA/ 
Z /MTPI INSTRUCTION LOADED WRONG DATA/ 
Z /STACK NOT PUSHED BY MFPI-MTPI/ 
Z /KERNEL PAGE ACCESS INSTEAD OF USER: MFPI-MTPI/ 
Z /W.M. ABORT IN KlRNAL D-SPACE HAD WRONG CONDITION/ 
Z /ILLEGAL MODE 10 NOT ABORTED/ 
Z /SRO DID NOT REPORT ILLEGAL MODE 10 CORRECTLY/ 
Z /PSW CHANGED BY AN RTI IN USER MODE/ 
Z /ABORT I KERNAL 0-SPACE PICKED UP VECTOR pROM I-SPACE/ 
Z /D SPACE ENABLE CIRCUITRY HAS FAILED/ 
Z /INCORRECT STORE BY MTP INSTRUCTION/ 
Z /TRIED TO REFERENCE NON-RESIDENT PAGE/ 
Z /WRONG DATA FETCHED BY MFP INSTRUCTION/ 
Z /ILLEGAL CSM DID NOT TRAP TO 10/ 
Z /CSM DID NOT ENTER SUPERVISOR MODE/ 
Z /CSM SET UP WRONG PREVIOUS MODE/ 
Z /CSM SET UP STACK WRONG/ 
Z /CSM PUSHED INCORRECT ARGUMENT/ 
: /CSM PUSHED WRONG PC/ 

/CSM DID NOT CLEAR OLD PSW BITS <3:0>/ 

/CSM ACCESSED WRONG SUPERVISOR SPACE/ 

/CSM ABORTED WHEW IT SHOULD NOT HAVE/ 

?rSM FAILED TO INCREMENT/DECREMENT REGISTER PROPERLY? 

/CSM FAKED TO PUT PROPER ARGUMENT ON STACK/ 

ISR2 LOCKED UP AN 11/34 COMPATIBLE ADDHCSS THAT:<rRlF> 

IDOES NOT MAKE IT COMPUIBLE WITH AN 11/70 SINCE l<CRLF> 



ITHE OPTIONAL M7005 bCS' tfS IS MISSI^^i6! 
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SEQUENCE 


DATA HEADERS 




















1962 










.5BTTL 


DATA MPADERS 






1963 012672 


117 


114 


104 


DH1: 


.ASCIZ 


/OLD Pi 


OLD PSW 


R6 WAS CPUERR TESTNO 


ERRORPC/ 


196A 0ir752 


117 


114 


104 


DH2: 


-ASCIZ 


/OLD PC 


OLD PSW 


R6 WAS SRO SR2 


TESTNO ERRORPC/ 


1965 013042 


120 


104 


122 


OHIO 


-ASCiZ 


/PDR 4 


PSW 


TESTNO ERRORPC/ 




1966 013102 


123 


122 


060 


DH12 


-ASCIZ 


/SftO WAS 


EXPECTD 


PDR 4 PSW TESTNO 


ERRORPC/ 


1967 013162 


123 


122 


062 


DH13 


-ASCIZ 


/SR2 WAS 


EXPECTD 


PDR 4 PSW TESTNO 


ERRORPC/ 


1968 013242 


126 


056 


102 


DH14 


-ASCIZ 


/v. 8. A. 


ICIPDR4 


SRO WAS SR2 WAS TESTNO 


ERRORPC/ 


1969 013322 


126 


056 


102 


DH15 


.ASCIZ 


/v. 8. A. 


KIPDR4 


TESTNO ERRORPC/ 




1970 013362 


126 


056 


102 


DH16 


-ASCIZ 


/v. 8. A, 


KIFDR4 


SRO WAS EXPECTD TESTNO 


ERRORPC/ 


1971 013442 


126 


056 


102 


DH17 


.ASCIZ 


/V,8.A. 


KIPDR4 


SR2 WAS EXPECTD TESTNO 


ERRORPC/ 


1972 013522 


123 


122 


062 


DH20 


-ASCIZ 


/SR2 WAS 


EXPECTD 


TESTNO ERRORPC/ 




19/3 013562 


106 


111 


122 


DH21 


-ASCII 


/nRSJ ABORT 


SECOND ABORT/<CRLf> 




1974 013617 


123 


122 


060 




.ASCIZ 


/SRO WAS 


SR2 WAS 


SRO WAS SR2 WAS TESTNO 


ERRORPC/ 


1975 013677 


123 


122 


060 


DH22 


.ASCIZ 


/SRO WAS 


SR2 WAS 


TESTNO ERRORPC/ 




1976 013737 


120 


123 


127 


DH24 


.ASCIZ 


/PSW WAS 


R6 WAS 


TESTNO ERRORPC/ 




1977 013777 


105 


130 


120 


0H26 


.ASCII 


/EXPECTED 


REC£IV£D/<CRLF> 




1978 0U031 


123 


122 


060 




.ASCIZ 


/SRO 


SR2 


SRO WmS SR2 WAS TESTNO 


ERRORPC/ 


1979 014111 


105 


130 


120 


DH27 


-ASCII 


/EXPECTED: '<CRLF> 




1980 014123 


120 


123 


127 




.ASCII 


/PSW 


PC 


SRO SR2/<CRLF> 




1981 014157 


061 


067 


060 




.ASCII 


/170017 


(3$+4) 


020147 (3$)/<CRLF> 




1982 014214 


122 


105 


103 




.ASCII 


/RECEIVED:/<CRLF> 




1983 014226 


120 


123 


127 




.ASCIZ 


/PSW 


PC 


SRO SR2 TESTNO 


ERRORPC/ 


1984 014306 


104 


101 


124 


DH30 


-ASCII 


/DATA 


DATA/<CRLF> 




1985 014323 


105 


130 


120 




-ASCIZ 


/EXPECTD 


RECEIVD 


TESTNO ERR PC/ 




1986 014362 


124 


105 


123 


DH32 


-ASCIZ 


/TESTNO 


ERR PC/ 






1987 014401 


123 


122 


060 


DH33 


-ASCIZ 


/SRO WAS 


SR2 WAS 


TESTNO ER?ORPC/ 




1988 014441 


050 


115 


115 


DH34 


.ASCIZ 


/(WRO) 


(MWR1) 


(WR2) TESTNO ERRORPC 


EXPlCTING 020031/ 


1989 014532 


123 


122 


060 


0H36 


.ASCIZ 


/SRO WAS 


EXPECTD 


TESTNO ERRORPC/ 




1990 014572 


120 


123 


127 


DH37 


-ASCIZ 


/PSW WAS 


EXPECTD 


TESTNO ERRORPC/ 




1991 014632 


050 


120 


123 


DH^tO 


.ASCIZ 


/(PSW) 


TESTNO 


ERRORPC EXPECTING XXX340/ 


1992 014703 


105 


12? 


122 


DH41 


■ASCII 


/ERROR 


AUTOI-D 


VIRTUAL/<C.'^LF> 




1993 014733 


122 


105 


107 




.ASCII 


/REGISTR 


REGISTR 


ADDRESS TESTNO PC AT ABORT/ 


1994 015007 


107 


10A 


104 


DH42 


-ASCIZ 


/GDDATA 


STORED 


TESTNO ERRORPC/ 




1995 015047 


050 


115 


115 


DH43 


.ASCIZ 


/(MMRO) 


(MMRl) 


(W1R2) TESTNO ERRORPC/ 


1996 015117 


105 


130 


120 


DH44 


-ASCIZ 


/EXPECTD 


(PSW) 


TESTNO ERRORPC/ 




1997 015157 


117 


114 


-•04 


0H45 


-ASCIZ 


/OLDPSW 


TESTNO 


ERRORPC/ 




1998 015207 


124 


105 


123 


DH55 


.ASCIZ 


/TESTNO 


ERR PC 


RO EXP RO RCV/ 




1999 015246 


124 


105 


123 


0H57 


" .ASCIZ 


/TESTNO 


ERR PC 


AR6EXP ARGRCV/ 




2000 










-EVEN 











62 
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2002 
2003 
2004 
2005 
2006 
2007 
2008 
2009 
2010 
2011 
2012 
2013 
2014 
2015 
2016 
2017 
2018 
2019 
2020 
2021 
2022 
2023 
2024 
2025 
2026 
2027 
2028 
2029 
2030 
2031 
2032 



015306 
015324 
015344 
015356 
015374 
015412 
015430 
015442 
015460 
015476 
015510 
015526 
015540 
015552 
015570 
015606 
015620 
015626 
015642 
015654 
015664 
015700 
015712 
015726 
015742 
015754 
015766 
016000 
016010 
016022 



001260 
001260 
001166 
001264 
001270 
001162 
001162 
001162 
001162 
001270 
001176 
001264 
001164 
001162 
001164 
035336 
001254 
001164 
001264 
001162 
001264 
001162 
001162 
001264 
001170 
001162 
001176 
035332 
001254 
001254 



001262 
001262 
001176 
001170 
001172 
001172 
001172 
001172 
001172 
001164 
001202 
001270 
001166 
001164 
001170 
001176 
001116 
001166 
001164 
001254 
001266 
001164 
001164 
001266 
035334 
035326 
035330 
U01254 
001116 
001116 



001256 
001256 
001254 
001166 
001166 
001264 
001254 
001264 
001270 
001254 
001264 
001254 
001254 
001264 
001264 
001254 
000000 
001170 
001254 
001116 
001270 
001254 
001166 
001270 
001254 
001254 
001254 
001116 
001176 
001176 



DTI: 
DT2: 
DT10 
0T12 
DT13 
DT14 
DT15 
DT16 
DTI 7 
D120 
DT21 
0T22 
DT24 
DT26 
DT27 
DT30 
DTi? 
DT34 
DT36 
DT40 
DT41 
DT42 
DT43 
DT45 
DT46 
DT47 
DT50 
DT52 
DT55 
DT57 



.SSTTL DATA TABLES 

.WORD TRAPPC.TRAPPS,WASR6.CPUERR,TESTNO.$ERRPC,0 

.WORD TRAPPC,TRAPPS,WASR6,WASSR0>WASSR2,TESTNO,$ERRPC.0 

.WORD $RE62-$TMPOJESTNO,$ERRPC,6 

.WORD WASSRO,$RE63,$REG2,$T«PO,TESTNO,$ERRPC,0 

.WORD WASSR2,$REG4,$REG2,$TMP0-TESTNO,$ERRPC,O 

.WORD $REGO,$RE64,WASSRO,WASSR2,TESTNO,$ERRPC,0 

.WORD $R£GO,$REG4,TESTNO,$ERRPC,0 

.WORD $R£GO,$REG4,WASSRO,$R£G2,TESTNO,$ERRPC,0 

.WORD $RE60-$REG4,WASSR2,$Rfc'G3, TESTNO, SERRPCO 

.WORD WASSH2,$R^G1,TESTN0,$ERRPC.0 

.WORD $TMPO STM. 2,WASSR0,WASSR2,TESTN0,$ERRPC,0 

.WORD UASSRO.WASSR2,TESTNO,$ERRPC,0 

.WORD $RE61,iREG2,T£STNO.$ERRPC,0 

.WORD $REGO,^REG1,WASSRO.WASSR2,TFSTNO,$ERRPC,0 

.WORD $RE61,$RFG3.WASSR0,WASSR2.TESTN0,$ERRPC,0 

.WORD ACSMSP,$T«P0,TESTNO,$ERRPC.0 

.WURD TESTNO,$ERRPC,0 

.WORD $RE61,iREG2,$REG3,T[STNO,$ERRPC.0 

.WORD WASSRO,$RE61,TESTNO,$tRRPC,0 

.WORD $RE60JE5TNO,$ERRPC.O 

.WORD WASSRO,WASSR1,WASSR?,TESTNO,BADPC,0 

.WORD $REG0,$R£G1 ,TESTN0.$ERRPC,0 

.WORD $RE60-$REG1,$REG2,TESTNO,$ERRPC,0 

.WORD WASSRO.WASSR1,UASSR2,TESTNO,$£RRPC.O 

.WORD $RE63,ACSMPS,TESTN0JeRRPC,0 

.WORD $RE60,CSM1ST,T£STN0,$ERRPC,0 

.WORD $TMP0.CSH2ND,TESTN0,$ERRPC,0 

.WORD CSM3RD,TESTN0,$ERRPC.0 

.WORD TESTNO,$ERRPC,$TMPO,$RE60,0 

.WORD TE5TNO,$ERRPC,$TMPO.$TMP1.0 
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DATA FORMAT BYTE 


STRINGS 










2034 








.SBTTL 


DATA FORMAT BYTE STRINGS 


2035 01 6034 


000 


000 


000 Drl: 


■ BYTE 


0,0,0,0,0 


2036 016041 


000 


000 


000 DF2: 


.BYTE 


0,0,0,0,0,0,0 


2037 016050 


000 


000 


OnO DF3: 


.BYTE 


0,0,0,0 


2038 016054 


000 


000 


000 DF5; 


.BYTE 


0,0,0 


2039 016057 


000 


000 


000 DF12.- 


.BYTE 


0,0,0,0,0,0 


2040 016065 


000 


000 


DF32; 


-BYTE 


0,0 


2041 








.EVEN 





SEQUENCb" 64 



CKKTBDO 

***** 

2042 
2043 
2044 
2045 
2046 
2047 
2048 
2049 
2050 
2051 
2052 
2053 
2054 
2055 
2056 
2057 
2058 
2059 
2060 
2061 
206? 
2 63 
2064 
2065 
2066 
2067 
2068 
2069 
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016070 
016072 
016074 
0160'6 



016100 
016104 
016110 
016114 
016116 
016124 
016130 
016134 
016140 



005227 
Mill! 
001401 
000000 



012637 
012637 
010637 
104001 
012737 
005037 
013746 
013746 
000006 



001260 
001262 
001256 

Mini 
Mlltb 
001262 
001260 



.SBTTL **•<** TRAP HANDLING ROUTINES ***** 



.S8TTL CPU TRAP HANDLER ROUTINE 

; ****************************************************** ir******** 

* 

* THIS SUBROUTINE WILL HANDLE ALL CPU TRAPS AND ABORTS THRU 

* "ERRVEC" (LOC. 004). U THIS SUBROUTINE IS ENTERED BY A 

* SECOND TRAP BEFORE THE FIRST HAS BEEN SERVICED, A HALT IS 

* tXECUTED. 



**************** *******^***!***A******i^i^l^^A)^(^i^i^,^it^i^i^«^,^ A Ai^l^i^l^,^^,^* 



TIMERR: 
TIMFL6: 



1$: 



016072 



INC 
.WORD 
BEQ 
HALT 



MOV 

MOV 

MOV 

ERROR 

MOV 

CLR 

MOV 

MOV 

RTT 



(PC)^ 

"1 

1$ 



0<SP) + ,TRAPPC 

;ySP)+,TRAPPS 

KSP,IJASR6 

+ 1 

/f"1.TIr1FLG 

CPUERR 

TRAPPS,-'KSP> 

TRAPPC,-(KSP.i 



MAKE FLAG ZERO U FIRST TIME THRU 

NEGATIVE ONE FOR "HAVE ENTERED" FLAG 

BRANCH IF FtTtST TIME IH 

STOP! - rVE ENTERED THIS ROUTINE 

A SECOND TIME BEFORE I FINISHED 

REPORTING THE FIRST ERROR. THE 

SECOND ENTRY ADDRESS SHOULD BE ON 

THE KERNEL STACK. 

SAVE PC+2 AT TIME OF ABORT 

SAVE PS AT TIME OF ABORT 

SAVE STACK POINTER VALUE 

UNEXPECTED IRAP OR ABORT TO LOC. 4 

MAKE FLAG NEGATIVE ONE FOR NEXT TIME 

CLEAR THE CPU ERROR REGISTER 

PUT PC I PS OF TRAP ON STACK 

;RETURN FROM INTERRUPT OR ABORT 
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SEQUEfiJCE 66 



2070 
2071 
2072 
2073 
207-; 
2075 
2076 
2077 
2078 
20/9 
2080 
2081 
2082 
2083 
208A 
2085 
c086 
2087 
2088 
2089 
2090 
2091 
2092 
2093 
2094 
2095 
2096 
2097 
2098 
2099 
2100 
2101 



016U2 
016UA 
016146 
016150 



016152 
016156 
016162 
016166 
016174 
016202 
016210 
016212 
016220 
016224 
016230 



016232 
016326 



005227 
Mllll 
001401 
000000 



012637 
012637 
010637 
013737 
013737 
042737 
10O02 
01? 737 
01-'7<6 
01 i746 
000006 



000000 
oOOOOO 



.S8TTI. MEMORY MANAGEMENT TRAP HANDLER ROUTINE 

* 

* THIS SUGROUTiNE WILL HANDLE ALL UNEXPECTED MEMORY MANAGEMENT 

* TRAPS AND ABORTS THRU '^WVEC" (LOC. 250). IF THIS SUBROUTINE IS 

* ENTERED BY A SECOND TRAP BEFORE THE FIRST HAS BEEN SERVICED, A 

* HALT IS EXECUTED. 

* 



001260 
001262 
001256 
177572 
177576 
160000 

M7711 
001262 
001260 



000000 
000000 



001264 
001270 
177572 

016144 



MGMERR: INC (PC)+ 

MGMFLG: .WORD -1 

BEQ 1$ 

HALT 



1$: MOV (k:sp) + ,trappc 

MOV (KSP;+,TRAPPS 

MOV KSPJMSR6 

MOV SR0.4ASSR0 

MOV SR2,WASSR2 

BIC #160000, SRO 

ERROR +2 

MOV #-1, MGMFLG 

.viOV TRAPPS,-(KSP) 

MOV TRAPPC,"(KSP) 
RTT 



MAKE FLAG ZERO IF FIRST TIME THRU 
NEGAIiVE ONE FOR "HAVE ENTERED" FLAG 
BRANCH \f FIRST TIME IH 
STOP! - I*VE ENTtRED IHIS ROUTINE 
A SECOND TIME BEFORE I FINISHED 
REPORTING THE FIRST ERROR. THE 
SECOND ^W'Mi ADDRESS SHOULD BE UN 
THE KERNiiL STACK. 



SAVE PC+2 AT TIME OF ABORT 
SAVE PS AT TIME OF ABORT 
SAVE STACK POINTER VALUE 
SAVE CONTENTS OF n.T STATUS 
SAVE CONTENTS OF KT STATUS 
CLEAR ERROR BITS IN STATUS 



REG. 
REG. 2 
REG 

UNEXPECTED TRAP OR ABORT TO LOC, 250 
MAKE FLAG NEGATIVE ONE FOR NEXT TIME 
PUT PC % PS OF TRAP ON STACK 



RfcJli:'N FROM INTERRUPT OR ABORT, 



000000 
000000 



;THE NEXT LOCATIONS ARE RESERVED FOR ANY PERMANENT PATCHES: 
PATCH: .WORD 0,0,0,0,0.0.0,0,0.0,0,0,0,0,0,0.0,0,0,0,0,0,0,0,0,0,0.0.0.0 
,WORD 0,0,0,0,0,0,0.0,0,0,0,0,0.0,0.0,0.0,0.0,0,0,0,0,0.0.0,0,0,0 
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2102 
2103 
21 OA 
2105 
2106 



020000 



020000 
02000A 
020006 
020012 
0200H 

020020 
020026 
02005A 
0200^.2 
020050 
020056 
02006A 
020072 
020100 
020106 
020112 



02n20 
02)126 
02)13^ 
02)1A2 
0?)150 
02)152 
020156 
020160 
020166 
020170 
0201 7A 
020202 
020206 
0202U 



020222 
020226 
02023^; 
020242 
C20250 
020256 

oc0260 
020262 
020266 
020270 
020276 
02030A 
020310 
0203U 



020000 



012706 
005026 
022706 
0013:'A 
012706 

012737 
012737 
01 2737 
012737 
012737 
012737 
012737 
012737 
013737 
005037 
112737 



012737 
012737 
012737 
012737 
005046 
012746 
000006 
012737 
000402 
062706 
012737 
005037 
012737 
012737 



013746 
012737 
012737 
012737 
022777 
001012 

000403 
012716 
000002 
012757 
012737 
012637 
005037 
132737 



PRT B 
HANDLER 



001100 

001140 

001100 

003042 
000340 
003270 
000340 
007206 
000340 
007274 
000340 
036054 
001212 
000001 



036316 
000340 
000002 
020170 

020160 

000006 

000010 
000012 
001310 
020206 
020214 



00CO04 
02020: 
177570 
177570 
17/777 



020270 

000176 
0001 7« 
000004 
001232 
000200 
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000020 
000022 
000030 
000032 
000034 
000036 
000024 
000026 
036046 

001115 



000014 
000016 
036316 
000010 



000010 

001106 
001110 



000004 
001140 
001142 
160662 



001U0 
001142 



001245 



; * ***** 
'* ***** 

.=20000 



STARTING POINT OF TEST ***** 
STARTING ADDRESS OF 200 ***** 



START: 

.S8TTL 

;; CLEAR 

MOV 
CLR 
CMP 
8NE 
MO'. 

;;INITIAL.ZE 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MUV 
CLR 

Move 

.-.'INITIALIZE 



#340,a#TRAPVEC*2;LEVEL 7 



yC$PWRDN,a*PWRVEC 

#340.a#PWRVEC+2 

$ENDCT,$E0PCT 

SESCAPE 

tfl.SERMAX 



CLEAR 



INITIALIZE THE COMMON TAGS 
THE COMMON TAGS (ICMTAG) ARtA 

nCMTAG,R6 

(R6) + 

^SWR,R6 ;;DONE? 

iSJAQK^SP 
FEW VECTORS 
*$SCOPE.a#IOTVEC 
*340.a#I01VEC+2 
TERROR, d*EMTVEC 
,V340,a#EMTVEC^2 
nTRAP,a#TRAPVEC 



LOCATION TO BE CLEARED 
MEMORY LOCATION 



LOOP BACK 
SETUP THE 



If NO 
STACK 



POINTER 



;IOT VECTOR FOR SCOPE ROUTINE 
LEVEL 7 

;£MT VECTOR FOR ERROR ROUTINE 
LEVEL 7 
TRAP VECTOR FOR TRAP LALLS 



THE "T-aiT" TRAP VECTOR. THEN 



;POWER FAILURE VECTOR 

LEVEL 7 

SETUP END-OF -PROGRAM COUNTER 

CLEAR THE ESCAPE ON ERROR ADDRESS 

ALLOW ONE ERROR PER TEST 



;THE "END-OF-PASS" ($EOP) ROUTINE, WITH A 



036316 64$: 



MOV 
MOV 
MOV 
MOV 
CIR 
MOV 
RTT 
MOV 
BR 
ADD 
MOV 
CLR 
MOV 
MOV 
;SI7E FOR A 
; EQUAL TO A 
MOV 
MOV 
MOV 
MOV 
CMP 
BNE 



nRTRN,3#TBlTVEC 

#3A0,a#TBITVEC+2 

*RTI,$RTRN 

*65$,a4'RESVEC 

-(SP) 

/f6A$,-(SP) 



65$: 
66$; 



jCRTT,$RTRN 

66$ 

*IO,SP 

#ReSV£C+2,a#RESVEC 

$T8IT 

*.,$LPADR 

^..$LPERR 
h/:?JlJARE SWITCH 
' "V, SETUP FOR 



LOAD LOCATION *'$RTRN", 
"RTI" OR "RTT". 
BIT VECTOR TO $RTRN 



IN 



;SET "T" 

.-LEVEL 7 

SET $RTRN TO A RTi 

TRY TO DO A RTT 

DUMMY PS 

AND PC 

TRY THE RTT 

RTT IS LEGAL— SET 



SRTRN TO A .rFT 



67$ 
68$ 
69$ 



MOV 
RTf 
MOV 
MOV 
MOV 
CLR 
BITB 



a^ERRVEC,"(SP) 

A'C7$,a#ERRVEC 

#DSWR.SWR 

#DDISP. DISPLAY 

>-l.aSWR 

69$ 

68$ 
06B%AS?) 

jTSWRECSWR 
#DISPR£G, DISPLAY 
(SP)+,afERRVEC 
$PASS 
*APTSI2E.$ENVM 



RTT ILLEGAL— CLEAN OFF THE STACK 
;;RESTORE TRAP CATCHER 

CLEAR "T" BIT SWITCH 

INITIALIZE THE LOOP ADDRESS FOR SCOPE 

SETUP THE ERROR LOOP ADDRESS 
REGISTER. If NOT FOUND OR IT IS 
A SOFTWARE SWITCH nEGI^:Ti:R. 



SAVE ERROR VECTOR 
SET UP ERROR VECTOR 
SETUP FOR A HARDWARE SWICH REGISTER 
AND A HARDWARE DISPLAY REGISTER 
TRY TO REFERENCE HARDWARE SWR 
BRANCH IF NO TIMEOUT TRAP OCCURRED 
AND THE HARDWARE SWR IS NOT = -1 
BRANCH IF NO TIMEOUT 
S:T UP FOR TRAP RETURN 

POINT TO SOFTWARE SWR 



RESTORE ERROR VECTOR 
CLEAR PASS COUNT 
TEST USER SIZE UNDER 



APT 



1 . — — 
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SEQUENCE 


6a 


INITIALIZE THE 


COMMON TAGS 
















020322 


001403 








BEQ 


70$ 


;; YES. USE NON-APT SWITCH 






020524 


012737 


001246 


001140 




MOV 


#$SWREG,SWR 


;;NO,USE APT SWITCH REGISTER 






020332 








70$: 










2107 










.SBTTL 


TYPE PROGRAM NAME 
















;;TYPE 


THE NAME 


OF THE PROGRAM U FIRST PASii 






020332 


005227 


M7777 






INC 


^-1 


;;FIRST TiMt? 






0203^6 


001047 








BNE 


7\% 


;; BRANCH IF NO 


' 




020340 


022737 


036252 


000042 




CMP 


*$ENDAD,a#42 


;;ACT-11? 






020346 


001443 








BEQ 


71$ 


■; BRANCH IF YES 






020350 


104401 


020416 






TYPE 


,72$ 


••TYPE ASCIZ STRING 


1 












.bblTL 


GET VALUE FOR SOFTWARE SWITCH REGISTi:R 






020354 


005737 


000042 






TST 


a^42 


;;ARE WE RUNNING UNDER XXDP/ACT? 






020360 


001012 








BNE 


73$ 


;; BRANCH \^ VE5 






020362 


123727 


001244 


000001 




CMP8 


$fcNV,*1 


:;ARE WE RUNNING UNDER APT? 






020370 


001406 








BEQ 


73$ 


: .-BRANCH U Yt:S 






020372 


023727 


001140 


000176 




CMP 


SWR^^ft^SWREG 


•/SOFTWARE SWiTCH REG SELECTED? 






020400 


001005 








BNE 


74$ 


; .-BRANCH U NO 






020402 


104407 








GTSWR 




;;6FT SOFT-SWR SETTINGS 






020404 


000403 








BR 


74$ 








020406 


112737 


000001 


001134 


73$: 


MOVB 


#1.$AUT0B 


;;SET AUTO-MODc INDICATOR 






020414 








74$: 












0P0414 


000420 








BR 


71$ 


■•GET OVER THt ASCIZ 














;;72$: 


.ASCIZ 


<CRLF>*CKKTBDO 11/44 f^EM MGMT PRT B#<CRLF> 






020456 








/•1$: 










2108 


020456 


104401 


020464 






TYPE 


,76$ 


;;TYPE ASCIZ STRING 






020462 


000436 








t'R 


^5$ 


■•GET OVER THE ASCIZ 














;-76$: 


. ASCIZ 


#EOP MESSAGES WILI ^KW^ EVERY 64 PASSES OR ABOUT 11 SECONDS* 






020560 
















2109 


020560 








LOOP: 










2110 


02C560 


C12706 


001100 






MOV 


*STACK,KSP 


-INITIALIZE THE STACK POINTER 




2111 


020564 


012737 


040000 


177776 




MOV 


#40000, PSU 


■TURN ON SUPERVISOR MODE 




2112 


020572 


012706 


000700 






MOV 


*SUPSTK,SSP 


•INITIA! IZE SUPER. STACK POINTER 




2113 


020576 


012737 


140000 


\7777t 




MOV 


#140000, PSW 


■TURN ON USER MODE 




21H 


020604 


01270O 


000600 






MOV 


#USESTK,USP 


•INITIALIZE USER STACK POINTER 




2115 


020610 


005037 


M177t 






CLR 


PSW 


•RETURN TO KERNAL MODE 




2116 


020614 


012737 


016070 


000004 




MOV 


#TIMERR,ERRVEC 


•LOAD CPU SERVICE ROUTINE INTO TRAP VECTOR 




2117 


020622 


012737 


000340 


000006 




MOV 


#340,ERRVEC+2 


•SET NEW PS TO PRIORITY LEVEL 7-KERNEl 




2118 


020630 


012737 


016142 


000250 




MOV 


#MGMERR,MMVEC 


•LOAD MEMORY MANAGENT ROUTINE INTO VEfTOR 




2119 020636 


012737 


0C0340 


000252 




MOV 


#340.WVEC+2 


SET NEW PS TO PRIORITY LEVEL 7-KCRNEL 




2120 0206AA 


012700 


M7777 






MOV 


#-1,R0 


•PUT -1 INTO RO TO INITIALIZE FLAGS 




2121 


020650 


010037 


0160^2 






MOV 


RO,TIMFLG 


•INITIALIZE CPU ERROR FLAG 




2122 


020654 


010037 


016144 






MOV 


RO.MGMFLG 


•INITIALIZE MEMORY MANAGEMENT ERRO'; FLAG 




2123 


02066U 


012737 


000340 


001274 




MOV 


#340,TBITPS 


■INITIALIZE LOG THAT HOLDS T-BIT PSW 




212A 


020666 


005037 


^77S72 




INJT: 


CLR 


MMRO 


8E SURE M^M. MGMT IS OFF TO START WITH, 




2125 


020672 


012737 


000020 


172516 




MOV 


#BIT4,MMR3 


■BUT TURN C\ 22'%U ADDRESSING MODE 




2126 


020700 


004737 


002060 






JSR 


PCAPRINIT 


•JUMP TO PAR/PDR INIT ROUTINE 





CKKT8D0 
GROUP 1 

2128 
2129 
2130 
2131 
2132 
213:^ 
21 3^ 
2135 
2136 
2137 
2138 
2139 
2U0 
2U^ 
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SEQUENCE 69 



SBTTL GROUP 1 ACCESS CONTROL FIELD/SPECIAL ABORTS TESTS 

***f*f**** *************** ♦ik*'«r ******** ***A****************A******* 

THE NEXT THREE (3) TESTS CAUSE MEMORY MANAGEMENT ERRORS 

TO CHFCK THE ABILITY OF STATUS REGISTER TO RECORD KT 

ERRORS AND THE ABILITY OF STATUS REGISTER 2 TO LOCK UP THE 

VIRTUAL ADDR. OF THE INSTRUCi i \M THAT CAUSED THE ERROR. 

THE BITS OF SR2 ARE CHECKED ANl blJS <15:13>. <6:5>, AND <3:0> 

ARE CHECKED IN SRO. SO THE SRO AND SR2 LOGIC AND THE 

KT ERROR LOGIC ARE CHECKED. 

******************************* **^K*^*i^**4**KA**'^ A** A A********** 

/.\./.\./.\./.\,/.\./A./.\./.\./.\./.\./.\./.\./.\-/.\*/A./.\./.\./,\./.\ 



CKKTBDO 
TEST # ■ 

2150 
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MACRO Ml 113 
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SEQUENCE 70 



2151 

2152 

2153 

2154 

2155 

2156 

2157 

2158 

2159 

2160 

2161 

216? 

2163 

2164 

2165 

2166 

2167 

2168 

2169 

2170 

2171 

2172 

2173 

2174 

2175 

2176 

2177 

2178 

2179 

2180 

2181 

2182 

2183 

2184 

2185 

2186 

2187 

2188 

2189 

2190 

2191 

2192 

^193 

2194 

2195 

2196 



020704 
020706 
020712 
020716 
020722 
020726 
020732 
020736 
020742 
020746 
020752 
020756 
02076? 
020770 
020774 
021000 
021004 
021012 
021020 
0?1022 
021030 
021032 



021034 
021036 
021042 
021044 
021046 



021050 
021056 
021064 
021070 
021072 



021074 
021100 
021104 
021106 



00C004 
012700 
010037 
010037 
010037 
010037 
010037 
010037 
012700 
012701 
012703 
012702 
012737 
010237 
010237 
010237 
012737 
012737 
005010 
013737 
005211 
104003 



000425 
062706 
005710 
001401 
104004 



013737 
013737 
020337 
001401 
104005 



012704 
020437 
001401 
104006 



000600 
172346 
172350 
172246 
172250 
177646 
177650 
060000 
100000 
100011 
077400 
021036 
172310 
172210 
177610 
021020 
000001 



000004 



177572 
177576 
001264 



021030 
001270 



SBTTL TEST # 1 - NON-RESIDENT ABORT TEST CACF=0a4) 

*TEST 1 NON-RESIDENT ABORT TEST (ACF=0&'i) 

* 

* THiS TEST CHECKS THE ACCESS CONTROL FIELD (ACF) COMPARATC? 

* LOGIC BY CAUSING NON-RESIDENT ABORTS IN KERNEL, SUPERVISOR 

* AND USER MODFS. PDR 4 IS LOADED WITH ACF'S = 064 AND 

* THEN PHYSICAL ADDR. 60000 IS ACCESSED TO CAUSE JHE ABORT. 



00025U 



001110 
177572 



177776 001176 



*********** 

TSTl: SCOPE 

1$: MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 

2$: MOV 
MOV 
M0\' 
MOV 
MOV 
MOV 

3$: CLR 
MOV 

4$; JNC 

ERROR 



**r*r************************************************* 



5$: 



00 1 264 
001270 



6$: 



7$: 



BR 

ADD 

TST 

BFO 

ERROR 



MOV 
MOV 
CMP 
BEO 
ERROR 



MOV 

BEO 
ERROR 



*600.R0 

R0.KIPAR3 

R0,KIPAR4 

R0,SIPAR3 

R0,SIPAR4 

R0,UIPAR3 

R0-UIPAR4 

;!'60000,RO 

*100006,R1 

#100011, R3 

#77400. R2 

#5$-MMVEC 

R2AIPDR4 

R2,SIPDR4 

R2,UIPDR4 

#3$,$LPERR 

#1 ,ri«R0 

(RO) 

PSU,$TMP0 

(Rl) 

+3 



8$ 

(RO) 

6$ 

+4 



SR0,WASSR0 

SR2,WASSR2 

R3,WASSR0 

7% 

+5 



#4$,R4 
R4,WASSR2 

es 

+6 



;L0AD DATA FOR PAR'S INTO RO 
;MAP KERNEL PAR'S 3£4 TO 12-16K 

;MAP SUPERVISOR PAR'S 3&4 TO 12-16K 

;«AP USER PAR'S 364 TO 12-16K 

LOAD VIRTUAL ADDR. TO REFERENCE PDR3 INTO RO 

LOAD VIRTUAL ADDR. TO REFERENCE PDR4 INTO Rl 

LOAD R3 WITH WHAT SRO SHOULD READ - N.R., KERNEL, 

lOAD ACF-0 (NON-RESIDENT) PDR VALUE JN R2 

POINT MEM. MGMT. TRAP VECTOR TO 5$ BELOW 

LOAD ACF TEST VALUE INTO KIPDR4 

LOAD ACF TEST VALUE INTO SIPDR4 

LOAD ACF TEST VALUE INTO UIPDR4 

SET LOOP ON ERROR POINTER TO 3$ 

TURN ON MEMORY MANAGEMENT 

CLEAR PHYS. LOC. 60000 USING PDR3 

SAVE PSW IN CASE OF ERROR 

TRY TO REF. IT USING PDR4 - SHOULD TRAP TO 5$ 

MEM. MGMT. A^ORT DID NOT OCCUR 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

'^R 5$" = 000772 

BRANCH AROUND STATUS REG. CHECKS IF NO ABORT 

RESTORE STACK POINTER 

010 INSTRUCTION GET ABORTED £ NOT EXECUTE 

BRANCy IF YES 

INSTRUCTION WAS NOT ABORTED, LOC. GOT CHANGED 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

•BR 3$** = 000764 

READ STATUS REGISTER 

READ STATUS REGISTER 2 

DID SRO REPORT NON-RESIDENT ERROR CORRECTLY? 

RRANCH If YFS 

SRO DID NOT REPORT NON-RES, ERROR CORRECTLY 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

'BR 3$*' = 000752 

LOAD R4 WITH WHAT SR2 SHOULD READ 

DID SR2 LOCKUP RIGHT VIRTUAL ADDR. (=4$)? 

BRANCH If YES 

SR2 DID NOT LOCK VIRTUAL ADDR. OF NON-RES. ERROR 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 



PG.4 
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2197 
2198 
2199 
2200 
2201 
2202 
2203 
220A 
2205 
2206 
2207 
2Z08 
2209 
2210 
2211 
2212 
2213 
2?M 
2215 
2c' 16 
2217 



021110 
0211U 
021122 
021 12A 
021130 
021136 
021 HO 
021 U6 
021150 
021154 
021162 
021164 
021170 
021172 
021176 
021202 
021206 
021210 
021214 



005037 
032737 
001006 
012703 
012737 
000711 
022737 
001006 
012703 
012737 
000677 
022702 
001407 
012702 
012703 
00501»7 
000665 
005037 
012737 



177572 
140000 

100151 
140000 

040000 

100051 
040000 

077404 

077404 
100011 
177776 

177776 
016142 



001176 

177776 
001176 

177776 



8$: 



11$; 



9$: 



000250 



10$: 



CLR MMRO 

BIT /(f140000,$T«PO 

BNE 11$ 

MOV #100151 ,R3 

MOV #140000. PSW 

BR 2$ 

CMP #40000, $TMP0 

BNE 9$ 

MOV #100051, R3 

MOV #40000, PSW 

BR 2$ 

CMP #77404, R2 

BEO 10$ 

MOV #77404, R2 

MOV #100011,R3 

cLR PSW 

BR 2$ 

CIR PSW 

MOV #MGMERR,MHVEC 



SEQUENCE n 



'BR 3$" = 000744 

TURN OFF MEMORY MANAGEMENT 

HAS ACF=0&4 BEEN TESTED IN USER YET 

BRANCH IF YES 

LOAD R3 WITH WHAT SRO SHOULD READ - N.R., USER, PG.4 

GO TO USER MODE 

REPEAT TEST IN USER MODE 

HAS ACF=084 BEEN TESTED IN SUPERVISOR YET 

BRANCH IF YES 

LOAD R3 WITH WHAT SRO SHOULD READ - N.R., SUPERVISOR, PG.4 

GO TO SUPERVISOR MO:>E 

REPEAT TEST \H SUPERVISOR MODE 

HAS ACF-; BEEN TESTED YET? 

BRANCH U YES 

THEN LOAD ACF^4 (NON-RES) PDR VALUE IN R2 

LOAD R3 WITH WHAT SRO SHOULD READ-N.R. , KERNEL, PG. 4 

GO BACK TO KERNEL MODE 

GO BACK I TEST ACF=4 IN SAME MODE 

GO BACK TO KERNEL MODE BEFORE LEAVING 

RESTORE ADDRESS OF NORMAL MEMORY 

MANAGEMENT ERROR ROUTINE TO MMVEC 
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SEQUENCE 72 



2226 



2227 
222e 
2229 
2230 
2231 
2232 
2233 
223A 
2235 
2236 
2237 
2238 
2239 
22A0 
22 A 1 
2242 
2243 
2244 
2245 
2246 
2247 
2248 
2249 
2250 
2251 
2252 
2253 
2254 
2255 
2256 
2257 
2258 
2259 
2260 
2261 
2262 
2'ctl 
2264 
2265 
2266 
2267 
2268 
2269 
2270 
2271 
2272 



021222 
021224 

021224 
021230 
021234 
021240 
021244 
021252 
021256 
021262 
021266 
021274 
021300 
021302 
021310 
021312 



021314 
021316 
021322 
021324 
021326 



021330 
021336 
021344 
021350 
021352 



021354 
021360 
021364 
021366 



021370 
021374 
021402 
021404 



UU0004 



012700 
012701 
012703 
012702 
012737 
010237 
010237 
010237 
012737 
005237 
005010 
013737 
005211 
104003 



000425 
062706 
005710 
001401 
104004 



013737 
013737 
02'1337 
001401 
104005 



012704 

020437 
001401 
104006 



005037 
032737 
001006 
012703 



060000 
100000 
020011 
077402 
021316 
172310 
172210 
177610 
021300 
177572 

177776 



000004 



177572 
177576 
001264 



021310 
001270 



177572 
140003 

020151 



S8TTL TEST * 2 - READ-ONLY ABORT TEST (ACF=2) 
*TEST 2 READ-ONLY ABORT TEST (ACF=2) 

* THIS TEST CHECKS THE ACCESS CONTROL FIELD (ACF) COMPARATOR 

* LOGIC BY CAUSING READ-ONLY ABORTS IH KERNEL, SUPERVISOR AND 

* USER MODES. PDR 4 IS LOAD WITH ACF=2 AND THEN 

* PHYSICAL ADDR. 60000 IS WRITTEN TO CAUSE THE A80RT. 



TST2: 
1$: 



SCOPE 



000250 2$: 



001110 
001176 



3$: 

4$: 



5$: 



001264 
001270 



6$: 



7$: 



001176 



8$: 



MOV J(r60000-R0 

MOV #100000, R1 

MOV #20011 ..R^ 

MOV #77402, R.' 

MOV #5$,MMVFr 

MOV R2,KIPDR4 

MOV R2,SIPDR4 

MOV R2,UIPDR4 

MOV #3$,$LPERR 

INC MMRO 

CLR (RO) 

MOV PSW,$TMPO 

INC (R1) 

ERROR +3 



BR 8$ 

ADD #4,SP 

TST CRO) 

BEQ 6$ 

ERROR +4 



MOV SRO^WASSRO 

MOV SR2,WASSR2 

CMP R3,WASSR0 

BEO 7$ 

ERROR +5 



MOV #4$,R4 

CMP R4,WASSR2 

BEO 8S 

ERROR +6 



CLR MMRO 

BIT #140000, STMPO 

BNE 11$ 

MOV #20151, R3 



KERNEL, SUPERVISOR AND US^R PAR'S 3 & 4, 

AND PDR 3 ARE SETUP FROM LAST TEST 

LOAD VIRTUAL ADDR. TO REFERENCE PDR3 INTO RO 

LOAD VIRTUAL ADDR. TO REFERENCE PDR4 INTO R1 

LOAD R3 WITH WHAT SRO SHOULD READ - R/0, KERNEL, PG.4 

LOAD ACF=2 (READ-ONLY) PDR VALUE IN R2 

MGMT. TRAP VECTOR TO 5$ BELOW 

IN'J KIPDR4 



POINT MEM. 
LOAD ACF=2 



LOAD ACF=2 INTO SIPDR4 

LOAD ACF=2 INTO UIPDR4 

SET LOOP ON ERROR POINTER TO 3$ 

TURN ON MEMORY MANAGEMENT 

CLEAR PHYS. LOC. 60000 USING PDR3 

SAVE PSW IN CASE OF ERROR 

TRY TO WRITE USING PDR4 - SHOULD TRAP TO 5$ 

MEM. MGMT. ABORT DID NOT OCCUR 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

•BR 3$*' = 000772 

BRANCH AROUND STATUS REG. CHECKS U NO ABORT 

RESTORE STACK POINTER 

DID INSTRUCTION GET ABORTED I NOT EXECUTE 

BRANCH IF YES 

INSTRUCTION WAS NOT ABORTED, LOC. GOT CHANGED 

FOR TIGHTER SCOPE LOOP 

REPLACE ERfJR CALL WITH 

•BR 3$" = 000764 

READ 'STATUS REG. 

READ STATUS REG. 2 

DID SRO REPORT READ-ONLY ERROR CORRECTLY? 

BRANCH IF YES 

SRO DID NOT REPORT R/0 ERROR CORRECTLY 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

•BR 31*' = 000752 

LOAD R4 WITH WHAT SR2 SHOULD READ 

DID SR2 LOCKUP RIGHT VIRTUAL ADDR. (-^$)? 

'BRANCH IF YES 

SR2 DID NOT LOCKUP VIRTUAL ADDR. OF R/0 ERROR 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

•BR 3$*^' = C00744 

TURN OFF MEMORY MANAGEMENT 

HAS ACF=2 BEEN TESTED IN USER MODE? 

BRANCH IF YES 

LOAD R3 WITH WHAT SRO SHOULD WiiAD-R/O, USER, P6.4 
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2273 

227A 
2275 
2276 
2277 
2278 
2279 
2280 
2281 
2282 



021410 
02U16 
02H20 
02H26 
02U30 
02U34 
021 4A2 
02UAA 
021A50 



012737 
000712 
022737 
001006 
012703 
012737 
000700 
005037 
012737 



UOOOO 177776 
040000 001176 11$: 



020051 
OAOOOO 

177776 
016142 



177776 



000250 



9$: 



MOV #140000. PSW 

BR 21 

CMP #40000. $TMPO 

BNE 9S 

MOV #20051, R3 

MOV #40000, PSW 

BR 2$ 

CLR PSW 

MOV #MGMERR,MMVEC 



SEQUENCE 1J> 



;G0 TO USER MODE 

;REPEAT TEST IN USER MODE 

;HAS ACF=2 BEEN TESTED IH SUPERVISOR MODE? 

;aRANCH U YES 

;LOAD R3 WITH WHAT SRO SHOULD READ-R/O, SUPERVISOR, P6.4 

;60 TO SUPERVISOR MODE 

;REPEAT TEST IN SUPERVISOR MODE 

;60 BACK TO KERNEL MODE BEFORE LEAVING 

;R£STORE ADDRESS OF NORMAL MEMORY 

.-MANAGEMENT ERROR ROUTINE TO MMVEC. 
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2295 
2296 
2297 
2298 
2299 
2300 
2301 
2302 
2503 
2304 
2305 
2506 
2307 
2308 
2309 
2310 
2311 
2^1? 
2313 
23U 
2315 
2316 
2317 
2318 
2319 
2320 
2321 
2322 
2323 
232A 
2325 
2326 



02U56 
02K60 
02U66 
02U74 
021502 
021510 

021512 
021520 
021522 
021530 
021536 
021:42 
021550 
021552 
021556 
021564 

021566 
021574 
021576 
021604 
021606 
021612 

021614 
021616 
021622 



000004 
012737 
012737 
012737 
012737 
104030 

012737 
000441 
013737 
012737 
012706 
022737 
001406 
012701 
013737 
104031 

022737 
001410 
022737 
001407 
012701 
104013 

000403 
012701 
104054 



0?1502 
021522 
0000C1 
100000 



177576 
016142 
001100 
100103 

100103 
177572 



021502 
021510 
021510 

021502 



SBTTL TEST ^ 3 - TEST ILLEGAL MODE "10" 
*TEST 3 TEST ILLEGAL MODE "10" 



THIS TEST CHECKS TO SEE THAT A 10 IN THE CURRENT MODE BITS OF THE 

PSW WHILE MEMORY MANAGEMENT IS ON IS ILLEGAL. A 

MEMORY MANAGEMENT ABORT SHOULD OCCUR AND STATUS REGISTER 

SHOULD REPORT NON-RESIDENT ABORT, MODE = 10, PAGE = 1 (100103). STATUS 

REGISTER 2 SHOULD LOCKUP THE ADDRESS OF THE INSTRUCTION 

THAT LOADED THE PSW IF M7095 ECO #8 IS MISJIGN. IF THE ECO IS 

INSTALLED, THE ADDRESS LOCKED UP WILL BE THAT OF THE UPDATED PC. 



001110 
000250 
177572 
177776 



i^*********:*i**ft ************* A A*f*********K A********************** 

TST3: SCOPE 



016142 000250 



001270 
000250 

177572 



001264 

001270 
001270 



1$: 



10$: 
2$: 



3$: 



4$: 



45$: 



021624 042737 160000 177572 5$: 



MOV 
MOV 
MOV 
MOV 
ERROR 

NOV 

BR 

MOV 

MOV 

MOV 

CMP 

BEQ 

MOV 

MOV 

E.^ROR 

CMP 
BEQ 
CMP 
BEQ 
MOV 
ERROR 

BR 

MOV 

ERROR 



BIC 



*10$,$LPERR 

^3$,MMVEC 

M) ,MMRO 

#100000, PSW 

+30 

;FOR A TIGHTER 

/*'M6M£RR,MMVEC 

5$ 

SR2,WASSR2 

/i'MGM£RR,MMVEC 

*KERSTK,SP 

A100103,SR0 

4$ 

*100103,R1 

SR0,WASSR0 

+31 

;FOR TIGHTER 

*10$,WASSR2 

45$ 

#2$,WASSR2 

5$ 

ir2$,Ri 

+ 13 

•FOR TIGHTER 

5$ 

#10$,R1 

+54 



3$ 



;SET LOOP ON ERROR POINTER TO 10$ 

;L0AD MEM. MGMT. TRAP VECTOR WITH 

;TURN ON MEMORY MANAGEMENT 

;S£T 10 IH PSW CURRENT MODE BITS 

; ILLEGAL MODE 10 NOT ABORTED 
SCOPE LOOP, REPLACE ERROR CALL WITH 'BR 10$" = 000774 

;REST0RE MEM. MGMT. ABORT VECTOR 

;8RANCH AROUND SRO I SR2 CHECKS 

;READ CONTENTS OF SR2 

;RESTORE MEM. MGMT. ABORT VECTOR 

;RESTORE STACK POINTER 

;DID SRO REPORT ILLEGAL MODE CORRECTLY? 

;eRANCH IF YES 

;LOAD EXPECTED CONTENTS OR SRO INTO R1 

;REAO CONTENTS OF SRO 

;SRO DID NOT REPORT NR ABORT, PG^I, MODt=10 
SCOPE LOOP, REPLACE ERROR CALL WITH 'BR 10$" = 000746 

;DID Snz LOCKUP VI RT. ADDR OF .ABORT ;DPM002 

;8RANCH IF OK BUT NOT FOR ECO 

;DID SR2 LOCKUP VIRT. ADDR OF 

; BRANCH ]f^ ANSWER IS OK 

;MOVE ERROR ADDRESS TO Rl FOR ERROR CALL 

;SR2 DID 
SCOPE LOOP, 



MS 

ABORT 



DPM002 
DPM002 
DPM002 
DPM002 

NOT LOCKUP VIRT. ADDR. OF ILL. MODE INST, 
REPLACE EMOR CALL WITH *BR 10$" = 000733 



;FOR TIGHTER 
#160000, SRO 



.-BRANCH OVER 2ND ERROR CALL 
;MOVE ADDRESS TO Rl FOR ERROR CALL 
;SR2 LOCKED UP AN 11/34 COMPATIBLt 
; ADDRESS THAT DOES NOT MAKE IT COMPA- 
;TI8LF WITH AN 11/70 SINCE THE OPTIONAL 
;M7095 ECO #8 IS MISSING 
SCOPE LOOP, REPLACE ERROR CALL WITH 'BR 10$ 
; CLEAR POSSIBLE ERROR BITS IN SRO 



DPM002 

DPM002 

DPM002 

DPM002 
;DPM002 
'• = 000727 



CKKTBDO 11 AA MEM M6MT PRT B MACRO Ml 11 3 
TEST # 3 - TEST ILLEGAL MODE "10" 



12-JAN-82 12:19 PAGE 



63 



SEQUENCE 75 



2327 
2328 
2329 
2330 
2331 
2332 
2333 
233A 
2335 
2356 
2337 
2338 
2339 
23/*0 
2341 
2342 



^^lir^J^tAiirt^rAAA^A^ilr^i^tAri^^^Aiki^iki^^tAi^ittt^f^ilr^AiVi^i^i^*!^*)^*^*!^*****^*:^]^!^***!^!^ 



THE NEXT TUO (2) TESTS WIlL BE CHECKING THE PAGE LENGTH 
COMPARATORS AND SOME MORE OF THE Kf ERROR DETECTION 
AND STATUS LOGIC. THE PACyE LENGTH FIfLD (PLF) IN KERNEL 
PDR 4 IS VARIED AND FOR EVERY PLF, THKtE (3) VIRTUAL 
ADDRESSES ARE READ. WHILE USING COTH UPUARD i DOWNWARD PAGE 
EXPANSION, ONE OF THOSE THREE VIRTUAL ADDRESSES WILL CAUSE A 
"PAGE LENGTH ABORT" WHILE THE OTHER TWO WON'T, 

STATUS REGISTER 6 2 ARE CHECKED WHEN THE PAGE LENGTH 

ABORT DOES OCCUR TO SEE THAT THE ABORT IS REPORTED AND THAT 

THE VIRTUAL ADDRESS OF THE INSTRUCTION THAT CAUSED THE ABORT 
IS LOCKLl) UP. 



;*A/t*r*)>r*iV***>V>,*************************t****** ************* ****** 
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SEQUENCE 76 



2355 
2356 
2357 
2358 
2359 
2360 
2361 
2362 
2365 
2364 
2365 
2366 
2367 
2368 
2369 
2370 
2371 
2372 
2373 
2374 
2375 
2376 
2377 
2378 
2379 
2380 
2381 
2382 
2383 
238^ 
2385 
2386 
2387 
2388 
2389 
2390 
2391 
2392 
2393 
2394 
2395 
2396 
2397 



021632 
021634 
021642 
021650 
021654 
021660 
021666 
021672 
021700 
021704 
021706 
021712 
021720 
021724 
021726 
021732 
021736 
021740 
0?1746 
021754 
021756 



021760 
021762 
021766 
021774 
022002 
0.2006 
022012 
022014 



022016 
022022 
022026 
022030 



022032 
0220^0 



000004 
012737 
012737 
012700 
012704 
012737 
010437 
012737 
012706 
011001 
062700 
012737 
012) 5 
011001 
062700 
020027 
001470 
012737 
012737 
011001 
10401C 



000424 
012706 
013737 
013737 
012702 
020237 
001401 
1C4011 



012703 
020337 
001401 
104012 



042737 
062704 



077406 
077406 
100000 
000406 
022052 
172310 
021700 
001100 

000100 
021720 
001100 

000100 
117700 

0^1754 
021762 



001100 
177572 
177576 
040011 
001264 



021754 
001270 



SBTTL TEST # 4 - PAGE LENGTH FAULTS-UPWARD EXPANSION 

;**********r*********************)k ***********/!***** ************** 

*TEST 4 PAGE LENGTH FAULTS-UPWARD EXPANSION 

* 

THIS TEST VARIES THE PAGE LENGTH flELO (PLF) IN KERNEL PDR 4 
FROM 1 TO 177 AND FOR EACH PLF, THREE VIRTUAL ADDRESSES (VBA'S) 
ARE ACCESSED. WHEN VBA <12:6> IS LESS THAN OR EQUAL TO PDR <14:8> 
NO ABORT SHOULD OCCUR. WHEN VBA <12:6> IS GREATER THAN PDR <14:8>, 
A PAGE LENGTH ABORT SHOULD OCCUR AND BE REPORTED BY SRO g SR2. 
THE PAGE EXPANSION DIRECTION IN THIS TEST IS UPWARD, (THE ED BIT 
(BIT 3) OF PDR 4 - 0) . 



172306 
172312 



000250 
001110 

001110 



** 

TST4 
1$: 



2$: 
3$: 

4$: 



001110 
000250 



5$: 



001264 
001270 



6$: 



**r*r******** 

SCOPE 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

ADD 

MOV 

MOV 

MOV 

ADD 

CMP 

BEQ 

MOV 

MOV 

MOV 

ERROR 



BR 

MOV 

MOV 

MOV 

MOV 

CMP 

BEQ 

ERROR 



**-***i^***-**-**************r*r**********************it* 



7?.: 



160000 
000400 



177572 8$: 



MOV 
CMP 
BEQ 
ERROR 



BiC 
ADD 



tf77406,KIPnR3 

^77406,KIPDR5 

#100000, RO 

#406, R4 

#9$,MMVEC 

R4,KIPDR4 

#3S,SLPERR 

#KcRSTK,KSP 

<R0),R1 

#100, RO 

#4$,$LPERR 

#KERST<,KSP 

(R0),R1 

#100, RO 

R0,#1 17700 

10$ 

#5$,$LPERR 

#6$,MMVEC 

(R0),R1 

+10 



8$ 

#kerstk,k:sp 
sr0,wassro 

SR2,WASSR2 
#40011, R2 
R2,WASSR0 
7$ 
+ 11 



#5$,R' 

R?,WaSSR2 

8$ 

+12 



#160000, SRO 
#400, R4 



MAKE SURE PDR3 IS DESCRIBED AS R/W 

MAKE SURE PDR5 IS DESCRIBED AS R/W 

LOAD VIRTUAL ADDR. TO SELECT P0R4 INTO RO 

LOAD FIRST PDR VALUE IN R4 (PLF=1, ACF=6) 

SETUP M.M. TRAP VECTOR FOR UNEXPECTED ABORTS 

LOAD KJPDR4 WITH PAGt LENGTH VALUE 

SET LOOP ON ERROR POINTER TO 3$ 

MAKE SURE STACK POINTER IS ALL SET UP 

ACCESS VIRTUAL ADDR. (VBA < PLF - NO ABORT) 

FORM NEXT VIRTUAL ADDRESS IN KO 

SET LOOP ON ERRO."^ POINTER TO 4$ 

MAKE SURE STACK POINTER IS ALL SET UP 

ACCESS VIRTUAL ADDR. (V8A=PLF - N^O ABORT) 

FORM NEXT VIRTUAL ADDs TN RO 

HAVE ALL PLF'S BEEN TESTED YET? 

BRANCH IF ALL VBA'S & PLF'S HAVE BEtN USED 

SET LOOP ON ERROR POINTER TO 5$ 

SETUP M.M. TRAP VECTOR FOR EXPECTED ABORT 

ACCESS VIRTUAL ADDR. (VBA > PLF - ABORT TO 6$) 

EXPECTED PAGE LENGTH ABORT DID NOT OCCUR 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

•BR 5$'* = 000776 

BRANCH AROUND ABORT CHECKS 

RESTORE STACK POINTER FOLLOWING ABORT 

READ M.M. STATUS REG. 

READ M.M. STATUS REG. 2 

PUT EXPECTED SRO CONTENTS IN R2 

DID SRO REPORT PG, LENGTH ABORT, PAGE 4, KERNEL? 

BRANCH IF YES 

SRO DID NOT REPORT PG- LENGTH ABORT CORRECTLY 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

'BR 5$" = 000757 

PUT EXPECTED SR2 CONTENTS IN R3 

DID SR2 LOCKUP VIRT. ADDR. OF ABORTED INSTRUCTION? 

BRANCH n YES 

SR2 DID NOT LOCKUP VIRT. ADDR. OF ABORT CORRECTLY 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

'BR 5$*' ^ 000751 

CLEAR ERROR BITS IN SRO 

FORM NEXT PLF VALUE FOR K1PDR4 



CKKTBDO 11M4 MEM MGMT 


PRT B 


MACRO M1113 12 


-JAN-82 


M 6 
12:19 PAGE 64-1 


TEST U i, - PAGE 


LENGTH 


FAULTS-UPWARD EXPANSION 






2398 0220AA 


162700 


000100 






SUB 


#100, RO 


2399 022050 


000703 








BR 


2$ 


2A00 














2A01 022052 


012657 


001260 




95: 


MOV 


(KSP) + JRAPPC 


2402 022056 


012637 


001262 






MOV 


(K5P)+,TRAPPS 


2405 022062 


013737 


177572 


001264 




MOV 


SRO.WASSRO 


2404 022070 


013737 


177576 


001270 




MOV 


SR2-WASSR2 


240S 022076 


042737 


160000 


177572 




BIC 


A'160000,SRO 


240. 0^2104 


104007 








ERROR 


+7 


2407 














2408 














2409 














2410 022106 


013746 


001262 






MOV 


TRAPPS,"(KSP) 


2411 022112 


013746 


001260 






MOV 


TRAPPC,-(KSP) 


2412 022116 


000002 








RTJ 




2415 














2414 022120 


012"o7 


016142 


000250 


10$: 


MOV 


#MGMERR,MMVtC 


2415 















SEQUENCE 77 



FORM FIRST VIRT. ADDR FOR THAT PLF VALUE 
BRANCH BACK AND kZClSS 3 VBA'S FOR 
mi PLF VALUE JUST FORMED 
SAVE PC I PS OF TRAP 

SAVE CONTENTS OF SRO FOR ERROR 

SAVE CONTENTS OF SR2 FOR ERROR 

CLEAR ERROR BITS IN SRO 

GOT 9Q. LENGTH ABORT BEFORE IT WAS EXPECTED 

FOR TIGHTER SCOPE LOOP 

REPLACE ERRO; CALL WITH 

A '>JOP*' = OOOcAO 

PUT PC a PS OF TRAP ON STACK 

RETURN FROM UNEXPECTED ABORT 

.•RESTORE NORMAL M.M. TRAP HANDLER 
;ADDRESS TO M.M. TRAP VECTOR 



r*- 



C<KT3D0 n/AA MEM MGMT PRT B MACRO Mil 13 12-JAN-82 12:19 
TEST tf 5 - PAGE LENGTH FAULTS-DOWNWARD EXPANSION 



N 6 
PAGE 65 



SEQUENCE 7S 



2427 



2428 

2A29 

2430 

2431 

2432 

2433 

2434 

2435 

2436 

2437 

2438 

2439 

2440 

2441 

2442 

2443 

2444 

2445 

2446 

2447 

2448 

2449 

2450 

245'( 

2452 

2453 

2454 

2455 

2456 

2457 

2458 

2459 

2460 

2461 

.?462 

2463 

2464 

2465 

2466 

2467 

2468 

2469 

2470 



022126 
022130 
022134 
022140 
022146 
022152 
022160 
022164 
022166 
022172 
022200 
022204 
022206 
022212 
022216 
022220 
022226 
022234 
022236 



022240 
022242 
022246 
022254 
022262 
022266 
t)222?2 
022274 



022276 
022302 
022306 
022310 



022312 
022320 
022324 
022350 



000004 
012700 
0^2704 
0)2737 
010437 
012737 
012706 
011001 
162700 
012737 
012706 
011001 
162700 
020027 
001470 
012737 
012737 
011001 
104010 



000424 
012706 
013737 
013737 
012702 
020237 
00140-1 
104011 



012703 
0.^03:^7 

10401^ 



042737 
162704 

062700 
009703 



117700 
077016 
022332 
172310 
022160 
0011 00 

000100 
022200 
001100 

000100 
100000 

022234 
022242 



001100 
177572 
177576 
040011 
001264 



022234 
001270 



160000 
000400 
000100 



SBTTL TEST # 5 - PAGE LENGTH FAULTS-DOWNWARD EXPANSION 

*TEST 5 PAGE LENGTH FAULTS-DOWNWARD EXPANSION 

* THIS TEST VARIES THE PAGE LENGTH FIELD (PLF) IN KERNEL PDR^ 

* FROM 176 TO AND FOR EACH PLF, THREE VIRTUAL ADDRESSES (VBA'S) 

* ARE ACCESSED, WHEN VBA <12:6> IS GREATER THAN OR EQUAL TO PDR <14:8> 

* NO PAGE ABORT SHOULD OCCUR. WHEN VBA <12:6> IS LESS THAN PDR <14:8> 

* A PAGE LENGTH ABORT SHOULD OCCUR AND BE REPORTED BY SRO 8 SR2. 

* THF PAGE EXPANSION DIRECTION IN THIS TEST IS DOWNWARD. (THE ED BIT 

* (£)if 3) OF P!>R4=1). 



000250 
001110 

001110 



TST5: 
1$.- 

2$: 
3$: 

4$: 



001110 
000250 



5$: 



001264 
001270 



6$: 



7$: 



177572 8$: 



^AKc********************* A****** ***************************** 

SCOPE 

LOAD VIRTUAL ADDR. TO SELECT PDR4 INTO RO 

LOAD FIRST PDR VALUE IN R4 (PLF=176,ACF=6) 

SETUP M.M. TRAP VECTOR FOR UNEXPECTED ABORTS 

LOAD KIPDR4 WITH PAGE LENGTH VALUE 

SET LOOP ON ERROR POINTER TO 3$ 

MAKE SURE STACK POINTER IS ALL SET UP 

ACCESS VIRTUAL ADDR, (VBA > PLF - NO ABORT) 

FORM NEXT VIRTUAL ADDRESS IN RO 

SET LOOP ON ERROR POINTER TO 4$ 

MAKE SURE STACK POINTER IS ALL SET UP 

ACCESS VIRTUAL ADDR. (VBA^^PLF - NO A80RT) 

FORM NEXT VIRTUAL ADDR. IN RO 

HAVE ALL PLF'S BEEN TESTED YET? 

BRANCH U ALL VBA'S I PLF'S HAVE BEEN USED 

SET LOOP ON ERROR POINTER TO 5$ 

SETUP M.M. TRAP VECTOR FOR EXPECTED ABORT 

ACCESS VIRTUAL ADDR. (VBA < PLF - ABORT TO 6$) 

EXPECTED PAGE LENGTH ABORT DID NOT OCCUR 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

•feR Sr* = 000776 

BRANCH AROUND ABORT CHECKS 

RESTORE STACK POINTER FOLLOWING ABORT 

READ M.M. STATUS REG. 

READ M.M. STATUS REG. 2 

PUT EXPECTED SRO CONTENTS IN R2 

DID SHO REPORT PG. LENGTH ABORT, PG. 4, KERNEL? 

BRAi.^H IF YES 

SRO DID NOT REPORT PG. LENGTH ABORT CORRECTL' 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

•BR 5$*^* = 000757 

PUT EXPECTED SR2 CONTENTS IN R3 

DID SR2 LOCKUP VIR^. ADDR. OF ABORTED INSTRUCTION? 

BRANCH IF YES 

SR2 DID NOT LOCKUP VIRT. ADDR. OF ABORT CORRECTLY 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

*BR 5$*' = 000751 

CLEAR ERROR BITS IN SRO 

FORM NEXT PLF VALUE FOR KIPDR4 

FORM FIRST VIRT. ADDR. FOR THAT PLF VALUE 

BRANCH BACK AND ACCESS 3 VBA'S FOR 



MOV 


#117700, RO 


MOV 


/^77016,R4 


MOV 


J*'9$,MMVEC 


MOV 


R4-KIP0ft4 


MOV 


#3$,SLPERR 


MOV 


#KERSTK,KSP 


MOV 


(R0),R1 


SUB 


j;^100,RO 


MOV 


J*'4$,$LPERR 


MOV 


#KERSTK,KSP 


MOV 


(R0)*R1 


SUB 


#100,RO 


CMP 


R0,A1 00000 


BEQ 


10$ 


MOV 


*5$,$LPERR 


MOV 


/C6$,MMVEC 


MOV 


(R0),R1 


ERROR 


+10 


BR 


8S 


MOV 


J^KERSTK^KSP 


MOV 


SRO,WASSRO 


MOV 


SR2,WASSR2 


MOV 


#406l1,R2 


CMP 


R2,WASSR0 


BEQ 


7$ 


ERROR 


+11 



MOV 
CMP 
BEQ 
ERROR 



BIC 
SUB 
ADD 
BR 



#5$,R3 

R3,W^SSR2 

8$ 

+12 



#160000, SRO 
#400, R4 
#100, RO 
2% 



CKlc.TBDO 11/^4 MEM MGflT 


PRT B 


MACRO Ml 113 


I2-JAN-82 


B 7 
12:19 PAGE 65-1 


TEST # 5 - PAGE 


LENGTH 


FAULTS-DOWNWARD 


EXPANSION 




2471 














2472 02233? 


012637 


001260 




9$: 


MOV 


(KSP)+,TRAPPC 


2473 022336 


012637 


001262 






MOV 


(KSP)*,TRAPPS 


2474 022342 


013737 


177572 


001264 




MOV 


SRO,WASSRO 


2475 022350 


013737 


177576 


001270 




MOV 


SR2,WASSR2 


2476 i)22lSf 


042/37 


160000 


17/572 




BIC 


^ i60000,SRO 


2477 022364 


104007 








ERROR 


+7 


2478 














2479 














2480 














2481 022366 


013746 


001 262 






MOV 


TRAPPS,-(KSP) 


2482 022372 


013746 


001260 






MOV 


TftAPPC,-(KSP) 


2483 022376 


000002 








RTJ 




2484 














2485 022400 


01^737 


016142 


000250 


10$: 


MOV 


AMGMERR^MMVEC 


2486 















SEQUENCE 79 



THE PLF VALUE JUST FORMED 
SAVE PC & PS OF TRAP 

SAVE CONTENTS OF SRO FOR ERROR 

SAVE CONTENTS OF SR2 FOR ERROR 

CLEAR ERROR BITS IN SRO 

GOT PG, LENGTH ABORT BEFORE IT WAS EXPECTED 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

A '^JOP** - 000240 

PUT PC I PS OF TRAP ON STACK 

RETURN FROM UNEXPECTED ABOR^ 

RESTORE NORMAL M.M. TRAP HANDLER 
ADDRESS TO M.M. TRAP VECTOR 



CKKTBDO 11AA MEM MGMT PRT B 
TEST # 6 - SR2 BIT TEST 

2500 



MACRO Mil 13 12-JAN-82 12:19 PAGE 



C 

66 



SEQUENCE 80 



2501 

2502 

2503 

250/* 

2505 

2506 

2507 

2508 

2509 

2510 

2511 

2512 

251 '> 

25H 

2515 

2516 

2517 

2518 

2519 

2520 

2521 

2522 

2525 

25?*t 

2525 

2526 

2527 

2528 

2529 

2530 



022A06 
022^10 
022A16 
022A24 
022A32 
022AAO 
022A44 
022A50 
022A56 
022464 
022470 
022472 
022476 
022502 
022504 
022510 
022516 
0-:?5:2 
02252A 



022526 
02253/ 
022540 
022544 
022550 

022552 
022560 



000004 
012737 
012737 
012737 
012737 
012700 
012701 
012737 
012737 
012720 
005020 
012720 
012710 
010107 
012706 
013737 
020137 
0014C1 
104013 



042737 
162700 
062701 
020127 
103745 

012737 
012737 



000600 
000600 
077406 
077402 
060000 
100000 
022504 
022464 
010727 

000137 
022504 

001100 
177576 
001270 



160000 
000004 
000002 
111002 



07. 06 
016U2 



S8TTL TEST ft 6 - SR2 BIT TEST 

*TEST 6 SR2 BIT TEST 

* 

* THIS TEST CHECKS THE BITS IN MEMORY MANAGEMENT REGI.STER 2 BY 

* CAUSING "READ-ONLY ABORTS" AT VIRTUAL ADDRESSES BETWEEN 100000 

» TO 111000 (PHYSICAL ADDRESSES 060000-071000). KIPDR4 IS USED TO EXECUTE 

* THE FOLLOWING FOUR WORDS OF CODE WHICH ARE MOVED THRU MEMORY: 

* 010727 MOV PC.(PC)+ :JH1S INSTRUCTION SHOULD CAUSE A R/O ABORT 

* 000000 ;ITS VIRTUAL ADDH. SHOULD BE LOCKED UP IN SR2 

* 000137 JMP QiffZt ;THIS INSTRUCTION IS ALSO MOVED THRU MEMORY 
-r (ADDft. OF 3$) :1N CASE A R/O ABORT DOES NOT OrCUR, 

* :1N WHICH CASE SR2 WILL NOT CONTAIN CORRECT ADDR 



172346 
172350 
172306 
172310 



000250 
001110 



001270 



*********** 

TST6: SCOPE 

1$: MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 

2$: MOV 
CLR 
MOV 
MOV 
MOV 

3$; MOV 
MOV 
CMP 
BEO 
ERROR 



*************************************** ** + ***)^ ****** 



}775?2 4$: 



172310 
000250 



5$: 



BiC 
SUB 
ADD 
CMP 
BLO 

MOV 
MOV 



*600,KIPAR5 

#600,KIPAR4 

#77406, KIPDR3 

/'77402AIPDR4 

#60000, RO 

#100000, Rl 

#3$,MMVEC 

#2$,$LPERR 

#016727, (R0)+ 

(R0) + 

#000137, (R0)+ 

#3$,(R0) 

R1, PC 

#KFRSrK,KSP 

SR2,WASSR2 

R1,WASSR2 

4$ 

+13 



#160000, SRO 

#4.R0 

#2,R1 

R1,A111002 

2$ 

#77406, KIP0R4 
#M6MERR.MMVEC 



BE SURE PAR3 IS MAPPED TO 12-16K 

8E SURE rAR4 IS MAPPED TO 12-16K 

MAP PAGE 3 128 BLOCKS, R/W 

MAP PAGE 4 128 BLOCKS, READ-ONLY 

LO^D RO WITH VIRTUAL ADDR. WHICH USPS P0R3 

LOAD R1 WITH VIRTUAL ADDR. WHICH USES HDR4 

SE1 M.M. TRAP VECTOR TO 3$ 

SET LOOP ON ERROR POINTER TO 2$ 

LOAD '>10V PC,(PC)+" INSTRUCTION AT ADDR. 

REACHED THRU PDR/PAR 4. 
LOAD "JMP a#3$" INSTRUCTION AT VIRT. ADDR. 

IN CASE R/O VIOL. DOES NOT ABORT 
TRANSFER PROGRAM EXECUTION TO "PAGE 4 INSTRUCTIONS" 
RESTORE STACK POINTER 
READ CONTENTS OF STATUS REG 2 
WAS ADDR. OF "RELOCATED - R/O ABORT" 
BRANCH If^ YES 

SR2 DID NOT LOCK UP VIRTUAL ADDR, OF R/O VIOL. 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
'BR 2$" = 000757 
CLEAR THE ERROR BITS IN SRO 
RESET RO TO POINT TO NEXT VIRT. ADDR. TO 
FORM VIRTUAL ADDR. THAT SHOULD BE LOCKED 
HAVE ALL VBA'S 100000-111000 BEEN TESTED? 
BRANCH IF NO 

RESTORE PDR4 TO R/W ACCESS 
RESTORE ADDREoS OF NORMAL M.M. 
TRAP HANDLER TO M.M. VECTOR 



LOCKED UP? 



LOAD 
UP NEXT 



CKKTBDO 11 MA MEM MGMT PRT B MACRO Ml 11 3 
TEST HI- MORE CHECKS OF SRO & SR2 



12-JAN-82 12:19 



D 7 

PAGE 67 



SEQUENCE 81 



25AA 



25A5 
25A6 
25A7 
25A8 
2549 
2550 
2551 
2552 
2553 
255A 
2555 
2556 
2557 
2558 
2559 
2560 
2561 
2562 
2563 
256A 
2565 
2566 
2567 
2568 
2569 
2570 
2571 
2572 
2573 
2574 
2575 
2576 
257/ 
2578 
2579 
2580 
2581 
2582 
2583 
2584 
2585 



022566 
022570 
022576 
022604 
022612 
022620 
022626 
022632 
022636 
022640 



022642 
022650 
022656 
022662 
022666 
022670 



022672 
022700 
022706 
022712 
022716 
022722 
022730 
022736 
0227^^ 
02 750 
022754 
022762 
022770 
022776 
023000 
023004 
023012 
025014 
023020 
023024 



000004 
012737 
012737 
012737 
012737 
013737 
012701 
020137 
001401 
104016 



012737 
013737 
012701 
020137 
001401 
104016 



U1273/ 
012737 
005037 
005237 
012706 
013737 
013737 
012737 
005237 
012706 
013737 
013737 
023737 
001402 
005237 
023737 
001402 
005237 
005737 
001401 



000600 
000406 
077402 
022620 
177576 
022620 
001270 



022650 
177576 
022650 
001270 



022700 
022716 
001200 
100500 
001100 
177572 
177576 
022750 
120000 
001100 
177572 
177576 
001176 

001200 
001202 

001200 
001200 



172352 
172310 
172312 
001110 

00'' 270 



001110 
001270 



oonio 

000250 



001176 
001202 
000250 



001264 
001270 
001264 



001270 



SBTTL TEST ft 7 - MORE CHECKS OF SRO t SR2 

; ************** ***i>r**************i,*****************************i^ 

*TEST 7 MORE CHECKS OF SRO I SR2 

THIS TEST PERFORMS SOME ADDiTJO^iAL CHECKS OF THE SRO fc SR2 LOGIC. 

FIRST IT CHECKS THAT SR2 "TRACKS" ALONG ACTING AS A VIRTUAL ADDRESS 

PROGRAM COUNTER. ALSO SRO & SR2 ARc LOCKED UP By A PAGE LENGTH 

ABORT, THEN WITHOUT CLEARING SRO'S ERROR BITS. A R/0 ABORT IS CAUSED. 

SRO S SR2 SHOULD NOT BE CHANGED BY THE SECOND ABORT AND THE 

INFORMATION ABOUT THE PAGE LENGTH ABORT SOULD STILL BE LOCKED UP, 

IN ADDITION A "RESET" IS EXECUTED TO VERIFY THAI SRO IS CLEARED 

AND SR2 IS UNLOCKED BY A RESET. mFTER MEMORY MANAGEMENT IS TURNED BACK ON, 

SR2 IS CHECKED TO SEE THAT IT IS TRACKING AGAIN. 



*%*«r*********i********W**i^**A*****A********i*A***********W*****i^* 

TST7: 
1$: 



2$: 



3$: 
4$: 



5$: 
6$; 



7$: 



8$: 



9$: 
10$: 



SCOPE 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

CMP 

BEQ 

ERROR 



MOV 
MOV 
MOV 
CMP 
BEQ 
ERROR 



MOV 
MOV 
CLR 
INC 
MOV 
MOV 
MOV 
MOV 
INC 
MOV 
MOV 
MOV 
CMP 
BEO 
INC 
CMP 
BEO 
INC 
TST 
BEO 



/'600.KIPAR5 

#406,KIPDR4 

*77402,KIPDR5 

yV2$,$LPERR 

SR2,WASSR2 

#2$.R1 

R1,WASSR2 

3$ 

+16 



/S'4$,$LPERR 

SR2,WASSR2 

^4$,R1 

R1,WASSR2 

5$ 



+16 



*6$,$LPLRR 

^7$,W1VEC 

$TMP1 

a^ftfl 00500 

^KERSTK.KSP 

SR0.$T«P0 

SR2,$TMP2 

#8$.MMVEC 

iWlJOOOO 

#KERSTK,KSP 

SRO,WASSRO 

SR.'.WASSR2 

$rMPO,WASSRO 

9% 

SFMPl 

$TMP2.WAS5R2 

10$ 

$rMPl 

$TMP1 

n$ 



MAP KERNEL PAGE 5 TO 12-16K 

SETUP PDR4 FOR PAGE LENGTH ABORT 

SE1UP PDR5 FOR R/O ABORT 

SET LOOP ON ERROR POINTER TO 2$ 

READ SR2 TO SEE IF ITS TRACKING 

PUT EXPECTED VIRTUAL PC IN Rl 

DID SR2 CONTAIN VIRTUAL PC AT 2$? 

BRANCH IF YES 

SR2 NOT TRACKING CORRECTLY 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

'^fi 2$" = 000767 

SET LOOP ON ERROR POINTER TO 4$ 

READ SR2 TO SEE IF JIS TRACKING 

PUT EXPECTED VIRTUAL PC IN Rl 

DID SR2 CONTAIN VIRTUAL PC AT 4$ 

BRANCH IF YES 

SR2 NOT TRACKING CORRlCTLY 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

'm 4$" = 000767 

SET LOOP ON ERROR POINTER TO 6$ 

PUT ADDRESS OF 7$ IN M.M. TRAP VECTOR 

CLEAR ERROR INDICATOR 

CAUSE PAGE LENGTH ABORT - TRAP TO 7$ 

RESTORE STACK POINTER AFTER ABORT 

SAVE SRC'S INFORMATION ON PG. LGTH. ABORT 

SAVE SR2'S INFORMATION ON PG. LGTH. ABORT 

PUT ADDRESS OF 8$ IN M.M. TRAP VECTOR 

CAUSE R/O ABORT - TRAP TO 8$ 

RESTORE STACK POINTER AFTER ABORT 

READ SRO FOLLWOING SECOND KT ABORT 

READ SR2 FOLLOWING SECOND KT ABORT 

IS SRO STILL HOLDING INFO ON FIRST 

BRANCH IF YES 

SET ERROR INDICATOR 

DOES SR2 STILL HOLD PC OF FIRST ABORT? 

BRANCH IF YES 

St! ERROR INDICATOR 

WERE SRO OR SR2 CHANGED UY A SECOND ABORT? 

BRANCH IF NO 



ABORT? 



CKKT8D0 11/4^ MEM MGMT 
TEST # 7 - MORE CHECKS 



PRT 3 
OF SRC 



& 



MACRO 
SR2 



2586 
2587 
2588 
2589 
2590 
2591 
2592 
2593 
259A 
2595 
2596 
2597 
2598 
2599 
2600 
2601 
2602 
2603 
260A 
2605 
2606 
2607 
2608 
2609 
2610 
2611 
2612 
2613 
26U 
2615 
2616 
2617 
2618 



023026 104014 



023030 
02503A 
023036 
023o4i 
023050 
023052 
023056 
023064 
023072 
023074 
023100 
023104 
023106 



023110 
023114 
023122 
023126 
0231 3^ 
023134 



023136 
023144 
023152 



005037 
000005 
013737 
005737 
001402 
005237 
013737 
022737 
001402 
005237 
005737 
001401 
104015 



005237 
013737 
012701 
020137 
001401 
104016 



012737 
012737 
012737 



Ml 113 12-JAN-82 12:19 PAGfc 



ERROR +14 



F 7 
67-1 



SEQUENCE 82 



001200 

177572 
001264 

001200 
177576 
023056 

001200 
001200 



001264 



001270 
001270 



177572 
177576 
023114 
001270 



001270 



077406 
077406 
016142 



172310 
172312 
000250 



11$: 


CLH 
RESET 


STMP1 




MOV 


SRO^WASSRO 




Tsr 


WASSRO 




BEQ 


12$ 




INC 


$TMP1 


12$: 


MOV 


SR2.WASSP2 




CMP 


*12$,UASSR2 




BEQ 


13$ 




INC 


$TMP1 


13$: 


TST 


$TMP1 




BEQ 


14$ 




ERROR 


+15 


14$; 


INC 


SRO 


15$: 


MOV 


SR2,WASSR2 




MOV 


*15$,R1 




CMP 


R1,WASSR2 
16$ 




BEQ 




ERROR 


+16 


16$: 


MOV 


#77406, KIPDR4 




MOV 


yl'77406.KIPDR5 




MOV 


#M6MERR,MMVEC 



ONE OF STATUS REGS. CHANGED BY SECOND ABORT 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

•BR 6$" = 000726 

CLEAR ERROR INDICATOR 

EXECUTE A RESET, APPLYING AN "INJT" 

READ SRO 

WAS SRO CLEARED BY THE RESET? 

BRANCH IF YES 

SRO NOT CLEARED BY A RESET 

READ SR2 

WAS SR2 UNLOCKED BY A RESFV? 

BRANCH IF YES 

SR2 NOT UNLOCKED BY A RESET 

WERE SRO Z SR2 BOTH "RESET" BY A RESET? 

BRANCH IF YES 

SRO OR SR2 NOT "RESET" BY A RESET 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

"BR 6$" - 000676 

turn memory management back on 

read sr2 to see rr its tracking again 

put expected viriual pc in r1 

did sr2 contain virtual pc at 15$ 

branch if yes 

sr2 not tracking correctly 

for tighter scope loop 

Replace error call with 

*BR 6$" = 000663 

KESET PDR4 TO 128 BLKS. R/W 

RESET PDR5 TO 128 BLKS, R/W 

RESTORE ADDRESS OF NORMAL MEMORY 

MANAGEMENT TRAP ROUTINE TO M.M. VECTOR 



._^.J 



CK<TBDO 11/4A MEM MGMT 
TEST # 10 - SUPER/USER 

2632 



ABORT 



MACRO 
PICKS UP 



M1113 
KERNEL 



12-JAN-82 
VECTOR 



12:19 PAGE 



F 
68 



SEQUENCE 83 



2633 
263A 
2635 
2656 
2637 
2638 
2639 
26^0 
2641 
26A2 
2643 
2644 
2645 
2646 
2647 
2648 
2649 
2650 
2651 
2652 
2653 
2654 
2655 
2656 
2657 
2658 
2659 
2660 
2661 
2662 
2663 
2664 
2665 
2666 
2667 
2668 
2669 
2670 
2671 
2672 
2673 



025160 
023162 
023166 
023174 
023200 



023204 
023212 
023220 
023226 
023234 
023240 
025246 
;.23254 



023260 
023264 
023266 
0232/2 



023274 
023500 
023304 
023310 
023516 
023322 



023326 
023334 
023342 
023350 
023356 
023562 
025570 
023376 



000004 
0O4737 
012757 
005057 
012706 



012757 
012757 
012757 
012757 
012706 
012757 
012737 
005757 



015701 
010602 
005057 
104017 



005057 
012706 
005057 
012757 
012706 
005057 



012757 
012757 
012757 
012757 
012706 
012757 
0)2757 
005757 



002556 
023174 
177776 
001100 



000600 
023274 
000340 
140000 
000600 
025260 
000340 
023261 



177776 
177776 



177776 
001100 
177640 
140000 
000600 
1/7776 



000600 
023416 
000340 
04000C 
000700 
023402 
000540 
023403 



001110 



177640 
000004 
000006 
177776 

000004 
000006 



177776 



172240 
000004 
000006 
177776 

000004 
000006 



S8TTL TEST ft ^0 ~ SUPER/USER ABORT PICKS UP KERNEL VECTOR 

• **************** ***************************i^***************t*** 

*TEST 10 SUPER/USER ABORT PICKS UP KERNEL VECTOR 



* 
* 
* 
* 
* 
* 
* 
* 
* 
* 

;**** 

TST10: 
1$: 

2$: 

• * 

• * 



THIS TEST CHECKS TO BE SURE THAT WHEN AN ABORT OCCURS WHILE 
IN SUPERVISOR OR USER MODE, THE TRAP VECTOR INFORMATION 
FETCHED IS TAKEN FROM KERNEL SPACE. USER PAGE IS MAPPED 
TO 12K (60000-77776) SO THAT IF USER SPACE IS USED INSTEAD 
OF KLRNEL, THE NEW PC THAT WAS LOADED AT LOC. 060004 IS USED 
INSTEAD OF THE NEW PC THAT SHOULD BE PICKED UP FROM LOC. 000004. 
THE SUPERVISOR PAGE IS THEN MAPPED TO 12K, AND THE TEST 
IS REPEATED FOR SUPERVISOR MODE. AN ODD ADDRESS ERROR IS 
USED TO CAUSE A TRAP TO *%". 

*********** ******l^********************1^,^** A i^Ai^^A-,^,^^**)^,^^,^]^* 

SCOPE 



3$: 



4$: 



JSR PC. TOFF 

MOV #2$,$LPERR 

CLR PSW 

MOV #KERSTK,KSP 

TcST USER MODE ABORT 

MOV *600,UIPAR0 

MOV *4$,a/r4 

MOV #340, a#6 

MOV #140000. PSW 

MOV #USFSTK,USP 

MOV #5$.a#4 

MOV #340, a#6 

TST 3$+1 



MOV PSW.R1 

MOV SP.R2 

CLR PSW 

ERROR +17 



CLR PSW 

MOV #KERSTK.KSP 

CLR UIPARO 

MOV #140000, PSW 

MOV #USESTK.USP 

CLR PSW 



TURN OFF T-BIT TRAPPING FOR THIS TEbi 
SET LOOP ON ERROR POINTER TO 2$ 
GO TO KERNEL MODE 
SETUP KERNEL STACK PTR. 



MAP USER PAGE TO 12K 

LOAD KERNEL VECTOR 4 (LOC. 4) WITH 4$ 

LOAD VECTOR+2 WITH NEW PSW 

GO TO USER MODE 

SETUP USER STACK PTR. 

LOAD USER VECTOR 4 (LQC. 60004) WITH 3$ 

LOAD VECTOR+2 WITH NEW PSW 

CAUSE ODD ADDR. ERROR TRAP TC "4" 

SHOULD PICK UP NEW PC=4$ FROM KERNEL 

LOC. 4. NOT PC=5$ FROM USER LOC. 4 (-60004) 

SAVE PSW FOR ERROR 

SAVE VALUE OF STACK POINTER FOR ERROR 

BE SURE BACK IN KERNEL MODE 

DID NOT TRAP THRU KERNEL SPACE 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

*ftR 2V' = 000740 

BE SURE BACK IN KERNEL MODE 

RESTORE KERNEL S.P. IN CASE IT CHANGED 

REMAP USER PAGE TO 0-4K 

GO TO USER MODE 

RESTORE USER STAC': POINTER 

60 BACK TO KERNAL MODE 



NOW TEST THE SUPERVISOR MODE ABORT 



MOV #600,SIPAR0 

MOV #6$.a#4 

MOV #340.a#6 

MOV #40000. PSW 

MOV #SUPSTK.SSP 

MOV #5^,a#4 

MOV #540, a#6 

TST 5$+1 



MAP SUPERVISOR PAGE TO 12K 

LOAD KERNAL VECTOR 4 WITH 6$ 

LOAD VECTOR+2 WITH NEW PSW 

60 TO SUPERVISOR MODE 

SETUP SUPERVISOR STACK PTR. 

LOAD SUPERVISOR VECTOR 4 (LOC. 60004) WITH 5$ 

LOAD VECTOR+2 WITH NEW PSW 

CAUSE ODD ADDR. ERROR TRAP TO "4" 



CKKTBDO 11 /AA MEM MGMT 


PRT B 


MACRO Ml 113 


12-JAN-82 


G 7 
12:19 PAGE 68-1 


TEST ^ 10 - SUPER/USER 


ABORT PICKS UP KERNEL 


VECTOR 




2674 














2675 














2676 023A02 


013701 


177776 




5$: 


MOV 


PSW.RI 


2677 023406 


010602 








MOV 


SP.R2 


2678 023410 


005037 


177776 






CLR 


PSW 


2679 023414 


104017 








ERROR 


+17 


2680 














2681 














2682 














2683 023416 


005037 


177776 




6$: 


CLR 


PSW 


2684 023422 


012706 


001100 






MOV 


#KERSTK,KSP 


2685 023426 


005037 


172240 






CLR 


SIPARO 


2686 023432 


012737 


040000 


177776 




MOV 


.fi'40000,PSW 


2687 023440 


012706 


000700 






MOV 


#SUPSTK,SSP 


2688 023444 


005037 


177776 






CLR 


PSW 


2689 023450 


012737 


016070 


000004 




MOV 


^TIMERR,ay;'4 


2690 023456 


004737 


002412 






JSR 


PCTON 



SEQUENCE 84 



SHOULD PICK UP NEW PC=6$ FROM KERNEL 

LOC. 4. NOT PC=5$ FROM SUPERVISOR LOC. 4 (=60004) 

SAVE PSW FOR ERROR 

SAVE VALUE OF STACK POINTER FOR ERROR 

BE SURE BACK IN KERNEL MODE 

DID NOT TRAP THRU KERNEL SPACE 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

•BR 2$" = 000740 

8E SURE BACK IN KERNEL MODE 

RESTORE KERNEL S.P. IN CASE IT CHANGED 

REMAP SUPERVISOR PAGE TO 0-4K 

GO TO SUPERVISOR MCD*^ 

RESTORE SUPERVISOR STACK POINTER 

GO BACK TO KERNEL MODE 

RESTORE ADDR. OF NORMAL CPU TRAP HANDLER TO 4 

TURN T-8IT TRAPPING BACK ON 



_..J 



CKKTBDO 11/4A MEM MGMT PRT B 
TEST # 11 - RTl IN SUPER/USER 

2697 



MACRO M1113 
MODE DOES NOT 



12-JAN-82 
CHANGE PSW 



12:19 PAGE 



H 
69 



SEQUENCE 85 



2698 
2699 
2700 
2701 
2702 
2703 
270A 
2705 
2706 
2707 
2708 
2709 
2710 
2711 
2712 
2713 

27^^ 

2715 
2716 
2717 



023A62 OOOOOA 



023A6A 
023A72 
023A76 
023502 
023506 
023512 
0235U 
023520 
023524 
023530 
023532 
023534 



023536 
023542 
023544 
023550 



01273? 
012702 
010237 
012746 
012746 
000002 
013701 
042701 
005037 
020201 
001401 
104032 



SBTTL TEST ft 11 - RTI IN SUPER/USER MODE DOES NOT CHANGE PSW 

;*********************♦♦********** ****f ************** ************ 

*TEST 11 RTJ IN SUPER/USER MODE DOES NOT CHANGE PSW 

* 

* THIS TEST CHECKS TO SEE THAT WHEN AN RTI IS EXECUTED IN SUPFRVISOR 

* OR USER MODE, THE MODf OR PRIORITV BITS OF THE PSW ARE NOT IHANGED, 

* 

'*********************■****************************************** 
TST11: SCOPE 



023476 
170000 
177776 
000340 
023514 

177776 
007437 
177776 



001110 



1$: 
2$: 

5$: 



02270? 050000 

00140-^ 

01270? 050000 

000752 



4$: 



MOV 
MOV 
MOV 
MOV 
MOV 
RTI 
MOV 
BK 
CLR 
CMP 
BFO 
ERROR 



CMP 
BEQ 
MOV 
BR 



*2$,$LPERR 
#170000, R2 
R2,PSW 
*340,"(SP) 
«$,-(SP) 

PSW.Rl 

#7437, R1 

PSW 

R2,R1 

4$ 

+32 



#50000, R2 
TST12 
#50000, R2 
2$ 



SET LOOP ON ERROR POINTER TO 2$ 

LOAD "PRESENT I EXPECTED" PSW VALUE INTO R2 

60 TO PRESENT MODE-PRIORJTY 

PUT A NEW PSW (PRiORJTY=7) ON STACK 

PUT NEW PC ON THE STACK 

DO AN RT^ FROM PRESENT MODE 

READ NEW PSW INTO R1 

MASK OFF COND. CODE, T-8IT, AND UNUSED BITS 

GO BACK TO KERNEL MODE 

DID PSW STAY IN PRESENT MODE, PRI0RITY=0? 

hRANCH IF YES 

PSW CHANGED BY AN RTI FROM USER 

FOR A TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

■BR=2$" = 000760 

IF SUPERVISOR MODE HAS BEEN CHECKED, 

;G0 TO NEXT TEST 

ELSE, SET SUPERVISOR MODE, 

AND BRANCH BACK TO TEST IT. 



CKKTBDO n/AA MEM M6MT PRT B MACRO M1113 12-JAN-82 12:19 PAGE 
TEST # 12 - KT ERROR NOT SERVICED IF ODD ADDR. ERROR 



J 
70 



SEQUENCE 36 



2729 



023552 

2730 02355A 

2731 023562 

2732 023566 

2733 U23572 
273A 023600 

2735 023606 

2736 02361 ; 
2/37 023620 
2738 

2739 
27A0 

27A1 023622 
27^2 023626 
2743 023632 
27AA 023640 

2745 023646 

2746 023652 

2747 023656 

2748 023660 

2749 023664 

2750 023670 

2751 023674 

2752 023676 

2753 023702 

2754 023706 

2755 023710 
2756 

2757 
2758 

2759 023712 

2760 023720 

2761 023726 

2762 Q217V, 



000004 
012737 
012705 
010537 
012737 
012737 
012737 
005237 
104020 



012706 
005037 
013737 
013737 
012700 
020037 
001402 
005237 
012701 
020137 
001402 
005237 
005737 
001404 
104021 



042737 
012737 
012737 
012737 



000600 
077402 
172310 
023622 
023620 
023614 
060001 



001100 
001200 
177572 
177576 
000017 
001264 

001200 
023640 
001270 

001200 
001200 



160000 
016070 
016142 
077406 



SBTTL TEST * 12 - KT ERROR NOT SERVICED U ODD ADDR. ERROR 

*TEST 12 KT ERROR NOT SERVICED IF ODD ADDR. ERROR 

THIS TEST CHECKS TO SEE THAT IF A CERTAIN VIRTUAL ADDRESS THAT 

WOULD CAUSE A MEMORY MANAGEMENT ERROR CAUSES AN ODD ADDRESS 

ERROR FIRST, THE ODD ADDRESS ERROR IS SERVICED BUT THE MEMORY 

MANAGEMENT ERROR ISN'T. THIS MEANS THAT SRO AND SR2 

SHOULD NOT REPORT THE ERROR OR LOCK UP ITS VIRTU/i ADDRESS. 

A READ-ONLY VIOLATION IS USED AS THE POTENTIAL rK-iORY MANAGEMENT 

ERROR 



172350 



000004 
000250 
001110 



TST12 
1$: 



001264 
001270 



2$ 
3$ 



4$ 
5$ 

6$ 
7$ 



********* 

: SCOPE 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
INC 
ERROR 



MOV 
CLR 
MOV 
MOV 
MOV 
CMP 
BEQ 
JNC 
MOV 
CMP 
BEQ 
INC 
TST 
BEQ 
ERROR 



*A******************************************^****** 



177572 
000004 
000250 
172310 



8$: 



BIC 
MOV 
MOV 
MOV 



*600,KIPAR4 
#77402, R5 
R5,KJPDR4 
#4$,a#4 
#3$. 3*250 
#2$i$LPERR 
60001 
+20 



#KERSTK,KSP 

STMPI 

SRO.WASSRO 

SR2,WASSR2 

*17,R0 

RO,WASSRO 

6$ 

$TMP1 

*5$,R1 

R1.WASSR2 

7$ 

STMPI 

$TMP1 

8$ 

+21 



#160000, SRO 
#TIMERR,S#4 
#M6MERR.a#250 
#77406, KIPDR4 



MAP KERNEL PAGE 4 TO 12-16K 

LOAD PDR4 DATA INTO R5 

MAP PAGE 4 READ-ONLY 

SET CPU TRAP VECTOR TO ADDRESS OF 4$ 

SET M.M. TRAP yU^^R TO ADDRESS OF 3$ 

SET LOOP ON ERROR POINTER TO 2$ 

CAUSE ODD ADDR. ERROR & POTENTIAL R/0 ABORT 

TRAPPED THRU M '■. VECTOR BUT SHOULDN'T HAVE 

FOR TIGHTER SCt -. LOOP 

REPLACE ERROR CALL WITH 

"BR 2$" = 000776 

RESTORE STACK POINTER AFTER TRAPPING 

CLEAR ERROR INDICATOR 

READ STATUS REG. 

READ STATUS REG. 2 

LOAD EXPECTED SRO CONTENTS INTO RO 

i>RO ERROR BITS LEFT CLEAR BY TRAPPING? 

BRANCH IF YES 

SRO ERROR BITS SET WHEN ODD ADDR. SERVICED 

LOAD EXPECTED SR2 CONTENTS INTO Rl 

WAS SR2 LEFT UNLOCKED BY TRAPPING? 

BRANCH IF YES 

SR2 LOCKED UP BY ODD ADDR. ERROR 

WHERE SRO OR SR2 EFFECTED? 

BRANCH U NO 

SRO OR Sk2 CHANGED BY ODD ADDR. ERROR 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

'BR 2$" = 000741 

CLEAR ERROR BITS THAT HAY BE SET IN SRO 

RESTORE ADDRESS OF NORMAL CPU TRAP HANDLER 

RESTORE ADDRESS OF NORMAL M.M. TRAP HANDLER 

REMAP PAGE 4 TO READ/WRITE 



CKKTBDO 11 /4A MEM MGMT PRT B 
TEST # 13 " PC & PSW SAVED FOR 

2777 



MACRO Mil 13 12-JAN-82 12:19 PAGE 
KT ERROR ON ODD ADDR. 



J 
71 



SEQUENCE 37 



2778 

2779 

2780 

2781 

2782 

2783 

2784 

2785 

2786 

2787 

2788 

2789 

2790 

2791 

2792 

2793 

2794 

2795 

2796 

2797 

2798 

2799 

2800 

2801 

2802 

2803 

2804 

2805 

2806 

2807 

2808 

2809 

2810 

2811 

2812 

2813 

2814 

2815 

2816 

2817 



023742 
023744 
023750 
023756 
023764 
023772 
024000 
024006 
024014 
024022 
024030 
024036 
024C44 
024050 

024054 
024060 
024062 
024070 
024076 
024104 
024110 
024114 
024122 
024126 
024132 
024136 



024142 
024144 
024150 

024154 
024156 
024162 
024170 
024172 
024176 



000004 
004737 
012737 
012737 
012737 
012737 
012737 
012757 
012737 
012737 
012737 
012737 
012706 
005237 

016601 
011603 
013737 
013737 
042737 
005037 
012706 
012737 
012706 
005037 
005037 
020127 



001402 
005237 
020327 

001402 
005237 
023727 
001402 
005237 
025727 



002356 
00060^ 
OOOoOO 
077402 
077406 
024054 
140017 
024054 
000340 
024036 
140000 
100002 
100005 

000002 

177572 
177576 
160000 
177776 
001100 
140000 
000600 
177776 
001176 
170017 



001176 
024054 



001176 
001264 

00:i76 
001270 



177646 
177650 
177606 
177610 
000004 
000006 
000250 
000252 
001110 
177776 



001264 
001270 
)77572 



177776 



020147 
024050 



SBTTL TEST * 13 - PC ft PSW SAVED FOR KT ERROR ON UDD ADDR. 

* t tit tit* it iritlciritt If -kit ir-klrittli titlritltit It** It felt * title it* t title -k* title* *1ii(1(ici( ic-k -kit ic1(i( 

*:EST 13 PC ft PSW SAVED FOR KT ERROR ON ODD ADDR. 

* 

* THIS TEST CHECKS THE PC AND PROCESSOR STATUS WORD SAVED WHEN 
A KT ERROR OCCURS DURING THE SECOND PUSH ON THE STACK DURING 
SERVICING OF AN ODD ADDR. ERROR. DURING A "DOUBLE ERROR" 
SEQUENCE SUCH AS THIS, THE PSW SAVED WILL BE THE ONE PICKED UP 
FROM VECTOR+2 (LOC. 6 IN THIS CASE) AFTER THE FIRST TRAP, 
NOT THE PSW PRESENT BEFORE THE FIRST TRAP. SRO AND SR2 
SHOULD RECORD THE KT ERROR (A R/0 VIOLATION BY THE USER STACK PTR.) 



NOTE THAT THE PREVIOUS MODE BITS <13:12> OF THE PSW 
WILL BE SET IN THE PSW THAT IS SAVED. 



*********** 
TST13: SCOPE 
1$: JSR 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 



******************^A^*iif******H-**(^*j|f**#iltTir**imr******fr* 



2$ 
3$ 

4$ 



5S; 



6$: 



75: 



MOV 
MOV 
INC 

MOV 
MOV 
MOV 
MOV 
BIC 
CLR 
MOV 
MOV 
MOV 
CLR 
CLR 
CMP 



6E0 

jNC 
CMP 

BEQ 
INC 
CMi' 
BEO 
INC 
CMP 



PC. TOFF 
#600,UIPAR3 
jC600,UIPAR4 
#77402, UIPDR3 
#77406, UiPDR4 
#4$.S#4 
#14001 7, a#6 
#4$,S#250 
#346-a#252 

#2$Jlperr 

#140000, PSW 
#100002, USP 
100005 

2<KSP), R1 

(KSP),R3 

SR0,WASSR0 

SR2iWASSR2 

#160000, SRO 

PSW 

#KERSTK,KSP 

#140000, PSW 

#USESTK,USP 

PSW 

$TMP0 

R1 ,#17001 7 



$TMPO 
R3,#3$+4 

6$ 

$TMPO 

WASSRO, #20147 

7$ 

STMPO 

WASSR2,#3$ 



TURN T-BIT TRAPPING OFF FOR THIS TEST 



MAP USER PAGE 3 
MAP USER PAGE 4 
MAP USER PAGE 3 
MAP USER PAGE 4 
LOAD ADDRESS OF 



TO 12-16K 

TO 12-16K 

READ-ONLY 

READ/WRITE 

4$ IN CPU (ODD 



ADDR.) VECTOR 
LOAD PSW THAT SHOULD BE PUT ON STACK IN VECTOR+2 
LOAD ADDRESS OF 4$ IN M.M. TRAP VECTOR 
LOAD A KERNEL PSW IN MMVEC+2 
SET LOOP ON ERROR POINTER TO 2$ 
GO TO USER MODE 

SET USER STACK PTR. SO SECOND PUSH IS IN PG. 3 
CAUSE ODD AD'^RESS EkROR THAT WILL CAUSE 
R/0 ERROR WHEN TRY TO SAVE OLD PC 
PUT PSW SAVED ON KERNEL STACK INTO R1 
PUT PC SAVED ON KERNEL STACK INTO R3 
READ THE CONTENTS OF M.M. STATUS REG. 
READ THE CONTENTS OF M.M. STATUS REG. 2 
CLEAR THE ERROR BITS IN SRO 
BE SURE IN KERNEL MODE 
RESTORE KERNEL STACK POINTER 
GO TO USER MODE 
RESTORE USER STACK POINTER 
60 BACK TO KERNEL MODE 
CLEAR ERROR INDICATOR 

WAS THE PSW SAVED THE ONE PICKED UP BY THE 
ODD ADDR. TRAP FROM ERRVEC+2? 
VALUE 170017 = PSW FROM LOC. 6 WITH 
PREVIOUS MODE BITS = USER 
BRANCH IF YES 

WRONG PSW SAVED DURING "DOUBLE ERROR" SEQUENCE 
WAS THE PC AT THE TIME OF THE ODD ADDR. ERROR 
SAVED ON THE STACK? 
BRANCH IF YES 

WRONG PC SAVED DURING TRAP SEQUENCE 
DID SRO REPORT - USER, PAGE 3, R/O ABORT? 
BRANCH IF YES 

SRO DID NOT REPORT R/O ABORT 
DID SR2 LOCK UP VIRIUAL ADDR. OF LAST 
INSTRUCTION SUCCESSFULLY FETCHED? 



CKKTBDO n/4A MEM MGMT PRT R MACRO Ml 113 12-JAN-82 12; 19 
TEST # 13 " PC & PSW SAVED FOR KT ERROR ON ODD ADDR. 



K 7 
PAGE 71-1 



SEQUENCE 88 



1 



2818 02A20A 


001402 








BEQ 


85; 


2819 024206 


005237 


001176 






INC 


li'MPO 


2820 024212 


005737 


001176 




8$: 


TST 


$TMPO 


2821 024216 


001401 








BEQ 


9$ 


2822 024220 


104022 








ERROR 


■>22 


2823 














2824 














2825 














2826 














2827 














2828 














2829 024222 


012737 


016070 


000004 


9$: 


MOV 


.*TIMERR,a#4 


2830 024230 


012737 


000340 


000006 




MOV 


*340,i*6 


2831 024236 


012737 


016142 


000250 




MOV 


#M6MERR.a#250 


2832 024244 


012737 


077406 


177606 




MOV 


yS'77406,UlPDR5 


2833 024252 


004737 


002412 






JSR 


PC. TON 



BRANCH IF YES 

SR2 DID NOT LOCK UP ADDR. OF ODD ADDR, INST. 

ANY "ERRORS" DURING TRAP SEQUENCE'/ 

BRANCH If NO 

THE WRONG PC OR PSW WERE SAVED 

OR SRO OR SR2 DID NOT REPORT R/O 

ERROR DURING ODD ADDR, - KT TRAP 

SEQUENCE 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

'IBR 2$" = 000710 

RESTORE ADDRESS OF NORMAL CPU TRAP HANDLER 

RELOAD ERRVEC+2 WITH KERNEL PSW 

RESTORE ADDRESS OF NORMAL M,M. TRAP HANDLER 

REMAP USER PAGE 3 READ/WRITE 

TURN T-8IT TRAPPING BACK ON 



L 7 
CKKTBDO 11/4A MEM MGMT PRT B MACRO M1113 12-JAN-82 12:19 PAGE 12 SEQUENCE 89 

GROUP 2 D-SPACE TESTS 

2834 .SBTTL GROUP 2 D-SPACE MS^% 

28^5 ;/.\./.\./.\./.\./.\./.\./.\./,\./.\./.\./.\./.\./.\,/.\./.\./.\./.\./A,/.\ 

2836 ;/.\./.\./.\./.\./.\./,\./.\./.\./A./,\./.\./,\./,\./.\./.\./.\,/.\./.\./.\ 



CKKTBDO 11 /4A MEM MGMT PRT B 
TEST # U - ENABLE D-SPACE AND 

2852 



MACRO M1113 12-JAN-82 12:19 PAGE 
SEE THAT 1-SPACE IS FORCED 



M 
73 



SEQUENCE 90 



2855 
2854 
2855 
2856 
2857 
2858 
2859 
2860 
2861 
2862 
2863 
286':. 
2865 
2866 
2867 
2868 
2869 
2870 
2871 
2872 
2873 
2874 
2875 
2876 
2%77 
2%1% 
2S79 
2880 
2881 
2882 
2883 
2884 
2885 
2886 
2%B7 
2888 
2889 
2890 
2891 



024256 000004 



024260 
024264 
024270 
024274 
024300 
024304 
024310 
024316 
024324 
024332 
02A336 



024344 
024346 
024350 
024352 
024354 
024356 
02A360 



024362 
024364 
024366 
024 370 
024372 
024374 



024400 
024406 
024414 
024420 
024424 
024430 
024434 



005037 
012700 
010037 
010037 
010037 
010037 
012737 
012737 
012737 
005237 
012737 



000400 
000244 
001776 
000264 
001376 
000270 
100376 



005700 
005200 
005300 
006000 
C06100 
005037 



0T2737 
012737 
005237 
005727 
005737 
005737 
005777 



177572 
077400 
172310 
172322 
172324 
172326 
000600 
002232 
024344 
177572 
000024 



177572 



100002 
024420 
177572 
060000 
100000 
1OOC0O 
053340 



S8TTL TEST # 14 - ENABLE 0-SPACE AND Sll THAT I-SPACE IS FORCED 

; *************************** *************H****H*************i^*** 

*rEST 14 ENABLE D-SPACE AND SEE THAT I-SPACE IS FORCED 

* 

THIS TEST SHOWS THAT I-SPACE IS FORCED DURING INSTRUCTION FETCHES, 
AND ADDRESS, INDEX AND OPERAND FETCHES U THE REGISTER FIELD IS 7, 



ALL ERRORS FOUND IN 
ABORTS THRU "MMVEC" 
ROUTLNE WILL REPORT 



THIS TEST ARE REPORTED WHEN THE CPU 
TO SUBROUTINE "NODSPAC". THIS SUB- 
THAT D-SPACE WAS NOT ENABLED PROPERLV. 



NOTE - WHENEVER A DSTM=3,6,7 IS SHOWN, AND THE OPERAND IS 
M00000\ I-SPACE IS FORCED IH THE OPERAND FETCH, 
BUT D-SPACE WILL BE FORCED ON THE ACCESS OF THE 
LOCATION; CORRECT OPERATION IS CHECKED. 



4[*i^*jlr**************************)V*************A********i^**AA**** 

TST14 



172370 
000250 
001110 

172516 



;* 

10$ 

4$: 

5$: 

6$: 

* 
* 
* 



060COO 
001110 



11$ 



SCOPE 

;iNITIALJ7e KERNAl. 1/D 

CLR mRO 

MOV #77400, RO 

MOV R0,KIPDR4 

MOV R0,KDPDR1 

MOV R0,KDPDR2 

MOV R0,KDPDR3 

MOV #600,KDPAR4 

MOV ^NODSPACMMVEC 

MOV #10$,$LPERR 

INC MMRO 

MOV -y24,MMR3 



SPACE PAR*S AND PDR'S 

TURN OFF MEMORY MANAGEMENT 

MAKE KERNAL D-SPACE PGS. 1>2&3 NON-RESIDENT 

:AND KERNAL I-SPACE PDR4 NON-RESIDENT 



;MAP KDPAR4 TO 12-M6K 

;SET M.M. VECTOR TO D-SPACE SERVICE ROUTINE 
;SET LOOP ON ERROR POINTER TO 10$ 
;TURN ON MEMORY MANAGEMENT 
;ENA8LE 22-BIT, KERNAL D-SPACE HAPPING 
TEST THAT INSTRUCTION FETCHES FORCE I-SPACE 



BR 4$ ;£.RANCH 

CLZ ;CLEAR ZERO HU IN PSW 

BEQ 4$ ;.gO BRANCH 

SEZ ;SET ZERO BIT IN PSW 

BNE 5$ ;N0 BRANCH 

SEN ;SET NEGATIVE BIT IN PSW 

BPL 6$ ;N0 BRANCH 

TRY SOME SOP INSTRUCTIONS WITH SRCM=DSTM=0 

THESE SHOULD NEVER INVOKE D-SPACE 



Tsr 

INC 
DEC 
ROP 
ROL 
CLR 



RO 
RO 
RO 
RO 
RO 
MMRO 



.•TURN OFF MEMORY MANAGEMENT 



TEST SOB NON-MOD WITH DSTM^2,3,6,7; DSTF^7 



MOV #100002,3*60000 

MOV #11$,$LPERR 

\HC MMRO 

TST #60000 

TST a^iooooo 

TST 100000 

TST aiooooo 



SET UP TEST LOCATION 

SET LOOP ON ERROR POINTER TO 11$ 

TURN ON MEMORY MANAGEMENT 

DSTM=2 SOP NON-MOD 

DSTM=3 SOP NON-MOD 

DSTM=6 SOP NON-MOD 

DSTM=7 SOP NON-MOD 



CKKTBDO n/AA MtM MGMT PRT B MACRO Mill 3 12-JAN-82 12:19 
TEST # U - tNABLE O-SPACE AND SEE THAT I-SPACE IS FORCED 



N 7 



SEQUENCE 91 



2892 
2893 
289A 
2895 
2896 
2897 
2898 
2899 
2900 
?901 
2902 
2903 
290A 
2905 
2906 
2907 
2908 
?909 
2910 
2911 
2912 
2913 
29U 
2915 
2916 
2917 
2918 
2919 
2920 
2921 
2922 
2923 
292A 
2925 
2926 
2927 
2926 
2929 
2930 
2931 
2932 
2933 
2934 
2935 
2936 
2937 
2938 
2939 
2940 
2941 
2942 
2943 
2944 
2945 
29-6 
2947 
2948 



024440 005037 177572 



024444 
024452 
024460 
024464 
024470 
024474 
024500 
024504 



02^510 
U24516 
024524 
02453.) 
024536 
02't544 
024552 
024560 



024564 
024572 
024600 
024604 
024612 
024620 
024626 
024634 



024640 
024646 
024652 
024660 
Ohbtt 
024674 
024702 



024706 
024714 
024722 
024726 
024732 
024/36 
024742 
024/46 



012737 
012737 
005237 
005027 
005037 
005037 
005077 
005037 



012737 
012737 
005237 
022??7 
023737 
023737 
027777 
005037 



012737 
012737 
005237 
012727 
012737 
012737 
012777 
005037 



012737 
005237 
052727 
052737 
052737 
052777 
005037 



012737 
012737 
005237 
(100327 
000337 
000337 
000377 
005037 



024464 
100000 
177572 
060000 
100000 
100000 
053276 
177572 



024530 
100000 
177572 
060000 
100000 
100000 
053224 
177572 



024604 
100000 
^77572 
060002 
060000 
060000 
060000 
177572 



024652 
177572 
060000 
000000 
000000 
000000 
177572 



024726 
100002 
177572 
060000 
100002 
100CD2 
053Ui2 
177572 



001110 
060002 



oomo 

060002 

060000 
100000 
10000U 
053222 



001110 
060002 

O0OOO2 
100000 
100000 
053146 



001110 

060000 
100000 
100000 
053100 



001110 
060000 



1ZS 



13$: 



14$: 



15$: 



16$: 



CLR MMRO ;TURN OFF MEMORY MANAGEMENT 

TEST SOB MOD WITH DSTM=2,3,6,7; DSTF=7 



MOV #12$,$LPERR 

MOV #100000, a#60002 

INC MMRO 

CLR ^4^60000 

CLR a^l 00000 

CLR 100000 

CLR 8100002 

CLR MMRO 



;SET LOOP ON ERROR POINTER JO 12$ 

;SET UP TEST VALUES 

;TURN ON MEMORY MANAGEMENT 

;DSTM=2 SOP MOD 

;DSTM=3 SOP MOD 

;DSTM=6 SOP MOO 

;l)STM-7 SOP MOk' 

;TURN OFF MEMORY MANAGEMENT 



THE NEXT JHR?,E TESTS ARE CONCERNED WITH TESTING 
DOP AND NOT(SRCM=DSrM=0) 

TEST DOP DEST NON-MOD SRCM=DSTM=2,3,6,7; SRCF^DSTF=7 



MOV 

MOV 

INC 

CMP 

CMP 

CMP 

CMP 

CLR 

TEST 

SRCM: 



#13$,$LPERR 
*1OO60O,S#600O2 
MMRO 
#60000,^60000 



;SET LOOP ON ERROR POINTER TO 13$ 
;SET UP TEST VALUE 
;TURN ON MEMORY MANAGEMENT 
r.^wwvw,....vvvv *SRCM=2 DSTM=2 DOP NON-MOD 
a#100000-a#10000D ;SRCM=3 DSTM=3 DOP NON-MOD 
100000,100000 ;SRCM=6 DSTM=6 DOP NON-MOD 

SRCM=7 DSTM=7 DOP NON-MOD 
TURN OFF MEMORY fMNAGEMENT 



aiOOOOJ, 3100002 

MMRO 
MOV DEST AND NOT(SRCM=DSTM=0) 
:DSTM=2,3,6,7; SRCF=DSTF=7 



MOV #14$,$LPERR ;S£T LOOP ON ERROR POINTER TO 14$ 

MOV #100000.^*60002 ;SET UP TEST VALUE 

INC tVIRO ;TURN ON MEMORY MANAGEMENT 

MOV #60002, #60002 ;SRCM=2 DSTM:::2 MOV 

MOV #60000, S#100000 ;SRCM=2 DSTM=3 MOV 

MOV #60000,100000 ;SRCM=2 DSTM=6 MOV 

MOV #60000, ai 00002 ;SRCM=? DSTM^7 MOV 

CLR MMRO ;TURN OFF MEMORY MANAGEMENT 

TEST DOP DEST MOD AND NOT SUB 

SRCM=DSTM=2,3,6,7; SRCF=:DSTF=7 



MOV #(5$,$LPERR 

INC MMRO 

BIS #60000, #60000 

BIS #00000, a#i 00000 

BIS #00000,100000 

BIS #00000,3100002 

CLR MMRO 



TEST SWAB WITH DSTM=2,3,6,7; DSTF=7 



SET LOOP ON ERROR POINTER TO 15$ 

TURN ON MEMORY MANAGEMENT 

SRCM=2 DSTM=2 DOP MOD 

SRCM=2 DSTM=3 DOP MOD 

SftCM=2 DSTM=6 DOP MOD 

SRCM=2 DSTM=7 DOP MOD 

TURN OFF MEMORY MANAGEMENT 



MOV #16$-$LPERR 

MOV #100002, a#60000 

INC MMRO 

SWAB #60000 

SWAB a# 100002 

SWAB 100002 

SWAB ai 00000 

CLR MMRO 



TEST ROT/SHFT WITH DSTM4J,6,7; dSJF-7 



SET LOOP ON ERROR POINTER TO 16$ 

SET UP TEST VALUES 

TURN ON MEMORY MAMA6EMENT 

DSTM=2 SWAB 

DSTM=3 SWAB 

DSTM=6 SWAB 

DSTM=7 SWAB 

TURN OFF MEflORY MANAGEMENT 



CKKTBDO n/AA MEM MGMT PRT B 
TEST # U " ENABLE 0-SPACE AND 



29A9 

2950 

295] 

2952 

295^5 

295A 

2955 

2956 

2957 

2958 

2959 

2960 

2961 

2962 

2963 

296^; 

2965 

2966 

296/ 

2968 

2969 

2V^0 

2971 

2972 

2973 

297A 

2975 

2976 

2'i77 

2978 

2979 

2980 

2981 

2982 

2983 

2984 

2985 

2986 

2987 

2988 

2989 

2990 

2991 

2992 

2993 

299A 

2995 

2996 

2997 



02A752 
024760 
024766 
024772 
024776 
025002 
025006 
025012 



025016 
025024 
025032 
025040 
025044 
025050 
025054 
0250oO 
025064 



025070 
025076 
025102 
025106 
025112 
025116 
025122 



02SU6 
025134 
025142 
025146 
025152 
025156 
025162 



025166 
025174 
025176 
025204 
025210 
025214 
025220 
025224 
025230 



012737 
012737 
005237 
006127 
006137 
006137 
006177 
00503/ 



012737 
012737 
012737 
005237 
0*c^027 
072037 
072037 
0/2077 
005037 



012757 
005237 
070027 
07G037 
070037 
070077 
005037 



0127,';7 
0127V 
005257 
000157 
000137 
000177 
005C37 



012;'37 
005000 
012737 
005237 
160027 
160037 
160037 
160077 
0O'iO37 



0247/2 
100000 
17/572 
060000 
100000 
100000 
0527/0 
1/7572 



025044 
000001 
100000 
17/572 
000001 
100000 
100000 
052/ i^ 
177572 



025102 
177572 
000002 
100000 

100000 
052660 
1 7/5 72 



025146 
025162 
177572 
025152 
025156 
052616 
17/572 



025210 

100000 
^77^'72 
060002 
100000 
100000 
052552 
1/7572 



MACRO Ml 113 12-JAN-82 12:19 PAGE 
SEE THAT I-5PACE JS FORCED 



B 8 
73-2 



SEQUENCE 92 



001110 
060002 



001110 
060000 
060002 



001110 



OOMIO 
060000 



17$: 



18$: 



MOV 
MOV 
INC 
ROL 
ROL 
ROL 
ROL 
CLR 
TEST 

MOV 
MOV 
MOV 
INC 
ASH 
ASH 
ASH 
ASH 
CI.R 



*17J.$IPERR 

#100000, a#60002 

MNRO 

/y60000 

a;«ri 00000 

100000 

3100002 

MMRO 



ASH/ASHC WITH 0STM=^,3,6,7; DSTF=7 



SET LOOP ON ER;^OR dqjNTER TO 17$ 

SET UP TEST VALUES 

TURN ON MEMORY MANAGEMENT 

DSTM=2 ROT/SHFT 

DSTM=3 RO^/SWn 

DSTM=6 ROT/SHFT 

DSTM-7 ROT/SHFT 

TURN OFF MEMORY MANAGEMENT 



#18$,$LFERR 

#1-3*60000 

#100000, 5l#60002 

MMRO 

#1,R0 

a#100000,R0 

lOOOOO.RO 

ai00002,R0 

MW^O 



TEST MUL/DJV WITH DSTM-2,3,6,7; DSTF--^/ 



;SET LOOP ON ERROR POINTER TO 18$ 
;SET UP TEST VALUES 

;TURN ON MEMORY MANAGEMENT 

;DSTM=:2 ASH/ASHC 

;DSTM=3 ASH/ASHC 

;DSTM=6 ASH/ASHC 

;DSTM=7 Ao'H/ASHC 

;TURN OFF MEMORY MANAGEMENT 



19$: 



MOV #19$,$LPERR 

INC MM^O 

MUL #2-R0 

MUL a#100000,RO 

MUL IOOOOO-RO 

MUL 3100002, RO 

CLR MMRO 



001110 
060002 



201 
31$ 
22$ 
23$ 



28$: 



TEST JMP WITH DSTM=3,6,7; DSTF=7 



;SET LOOP ON ERROR POINTER TO 19$ 

;TURN ON MEMORY MANa\6Ep1ENT 

;DSTM=2 MUL/DIV 

;DSTri^3 MUL/DJV 

;DSTM=6 MUL/DJV 

;DSTM=7 MUL/DJV 

;TURN OFF MEMORY MANAGLrlENT 



MOV #20$,$LPERR 

MOV #23$,a#60000 

INC MMRO 

JMP a#21$ 

JMP 22$ 

JMP ai 00000 

CLP MMPO 



TEST SUB WITH DSTM=2,3,6,7; DSTF=7 



;SET LOOP ON ERROR POINTER TO 20$ 

l^U UP TEST VALUES 

;TURN ON MEMORY MANAGEMENT 

;DSTM=3 JMP 

;DSTM=6 JMP 

;DSrM=7 JMP 

;TURN OFF MEMORY MANAGEMENT 



MOV #28$,$LPERR 

CLR RO 

MOV #100000, a#60002 

INC MMPO 

SUB RO, #60002 

sua RO,a#iooooo 

SUB RO, 100000 

SUB R0,ai00002 

CLR MMRO 



;SET 
;SET 



LOOP ON 
UP TEST 



ERROR POINTER TO 28$ 
VALUES 



;TURN ON MEMORY MANAGEMENT 

;DSTM=2 SUB 

;DSTM=3 SUB 

;DSTM^6 SUB 

;DSTM=7 SUB 

;TURN OFF MEMORY MANAGEMENT 



CKKTBDO n/4^ MEM MGMT PRT B 
TEST # 15 - ENABLE D-SPACE A'^D 

3008 



MACRO M1113 12-JAN-82 12:19 PAGE 
SEE I-SPACE IS NOr FORCED 



C 
74 



SEQUENCE 93 



3009 
3010 
3011 
301? 
5013 
30U 
3015 
3016 
3017 
3018 
3019 
3020 
3021 
3022 
3023 
3024 
3025 
3026 
3027 
3028 
3029 
3030 
3031 
3032 
3033 
3034 
3035 
3036 
3037 
3038 
5039 
3040 
3041 
3042 
3043 
3044 
3045 
3046 
3047 
3048 
3049 
3050 
3051 
3052 



025234 
025236 
025242 
025246 
025252 
025256 
025262 



025266 
025272 
025276 
025304 
025312 
025520 
025326 
025334 
025342 
025350 
025356 
025362 
025364 
025366 
025370 
025372 
025376 



025402 
025410 
025414 
025416 
025420 
025422 
025424 
025430 



025434 
025442 
025446 
025452 
025456 
025460 



000004 
012700 
010037 
01 0037 
010037 
010037 
105037 



012700 
010037 
012737 
012737 
012737 
012737 
012737 
012757 
012737 
012737 
005237 
005710 
005720 
005730 
005750 
005770 
00503/ 



012737 
005237 
005010 
005020 
005050 
005050 
005070 
005037 



012737 
012702 
012700 
012701 
010021 
062700 



077406 
172510 
172522 
172324 
172526 
172506 



060000 
060000 
060002 
060004 
060006 
025562 
060000 
060002 
0'S0004 
060006 
177572 



000000 
1775/2 



025414 
177572 



000000 
1/7572 



025^76 
000052 
060000 
060000 

000002 



060C02 
060004 
060006 
001110 
060000 
06000? 
06000^ 
060006 



001110 



001110 



SBTTL TEST * 15 - ENABLE D-SPACE AND SEE I-SPACE IS NOT FORCED 

*TEST 15 ENABLE D-SPACE AND SEE I-SPACE IS NOT FORCED 

* 

* THTS TEST SHOWS THAT I-SPACE IS NOT FORCED , THE REGISTER FIELD 

* IS NOT 7, BUT THE OTHER CONDITIONS ARE MET. 



ALL ERRORS FOUND IN THIS TEST ARE REPORTED Wh..^ THE TPU ABORTS 
THROUGH 'WIVEC' TO SUBROUTINE 'NOL^SPAC. THIS SUBROUTINE WILL 
REPORT THAT D-SPACE WAS NOT ENABLED PROPERLY. 



T5T15: 



20$ 



1$: 



2$: 



SCOP 

MOV 

MOV 

MOV 

MOV 

MOV 

CLRB 



ft77^06M 
R0,KIPDR4 
RO^KDPDRI 
R0,KDPDR2 
R0,KDPDR5 
KIPDR5 



MA<E KIPDR4 R/W,4K,200 BLOCKS 

MAKE KDPDRl R/W,4K,200 BLOCKS 

MAKE KDPDR2 R/W,4K,200 BLOCKS 

MAKE KDPDR3 R/W,4K,200 BLOCKS 

MAKE KIPDR3 NON-RESIDENT 
TEST SOP NON-MOD; DSTM-1 ,2,3,5,7 



MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
INC 
TST 

rsT 

TST 
TST 
TST 
CLR 
TEST 

MOV 
INC 
CLR 
CLR 
CLR 
CLR 
CIR 
CLR 
TEST 



^60000, RO 

RO,a;l'60OO0 

*66oO2,a#600O2 

*60004,a#6C004 

*60006,a#60006 

r/60000,a#60000 
#60002, a#60002 

#600o;,a#60004 

#60006, a#60006 

MMRO 

(RO) 

(RO)^ 

a(RO)+ 
a-(po) 
ao(RO) 

MMRO 



SOP MOD; 0SrM=:1,2,3,5,7 



;SET UP CONSTANTS FOR TEST 



;SET LOOP ON ERROR POINTE'^ TO 1$ 



TURN ON MEMORY MANAGEMENT 
DSTM=1 SOP NON-MOD 
DSTM=2 SOP NON-MOD 
DSTM=5 SOP NON-MOD 
DSTM=5 SOP NON-MOD 
DSrM=7 SOP NON-MOD 
TURN OFF MEMORY MANAGEMENT 



#2$,$LPEUR 
MMRO 
(RO) 
(R0) + 
a(RO)+ 
a-(RO) 
30 ("cO) 
W1R0 
OOP DESI NON-MOD 



SET LOOP ON ERROR POINTER TO 2$ 
TURN ON MEMORY MANAGEMENT 
DSTM=1 SOP MOD 
DSTM=2 SOP MOD 
DSTM=3 SOP MOD 
DSTM=5 SOP MOD 
DSTM=7 SOP MOD 
TURN OFF MEMORY MANAGEMENT 
WITH 5HCM=1,2,3,5,7 AND DSTM=1 ,2.3,5,7 



ALl SOURCE MODES TO BE TESTED ARE TESTED HERE 



21$: 



MUV #3$,$LPtRR 

MOV #3?Jt2 

MOV #60000, RO 

MOV #60000, Rl 

MOV R0,(R1)+ 

ADD #2,r0 



;SET LOOP ON ERROR POINTER TO 5$ 

;SET UP ADDRESSES 60000-60064 FOR TEST 



CKKTBDO 11 /^A MEK MGMT PR! B 
TEST Jf/ 15 " ENABLE 0-SPACE AND 



MACRO Mini i;^-JAN-8^ 12:19 PAGE 
SEE 1-SPACE IS NOT FO.f^CED 
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SEQUENCE 94 



3055 
3054 
5055 
3056 
3057 
3058 
3059 
3060 
3061 
3062 
3063 
3064 
3065 
3066 
3067 
3068 
3069 
3070 
3071 
3072 
3073 
3074 
3075 
3076 
30? r 
30/8 
3079 
3080 
3081 
3082 
3083 
3084 
3085 
3086 
3087 
3088 
3089 
3090 
3091 
3092 
3093 
3094 
3095 
3096 
3097 
3098 
3099 
3100 
3101 
3102 
3105 
3104 
3105 
3106 
3107 
3108 
3109 



025464 
025466 
025472 
025476 
025500 
025502 
025504 
025506 
025512 
025514 
025516 
025520 
025522 
025526 
025530 
025532 
02553A 
025536 
025542 
025544 
025546 
02555U 
025552 
025556 
025562 
025566 
025572 
025576 
025604 



025610 
025612 
025616 
025624 
025630 
025632 
02563^ 
025636 
025640 
025644 



025650 
025654 
025662 
025670 
025674 
025676 
025700 
025704 



025710 
0257U 
025722 
025726 



077204 
012700 
005237 
021010 
021020 
021030 
021050 
021070 
022010 
022020 
022030 
0220*^0 
022070 
023010 
023020 
0^3030 
023050 
025070 
025010 
025020 
025030 
025050 
025070 
027010 
027020 
027030 
027050 
027070 
005037 



005000 
012701 
012737 
005237 
050011 
050021 
050031 
050051 
050071 
005037 



012701 
012737 
012737 
005237 
010031 
010051 
010071 
005037 



012701 
012737 
005237 
000311 



060000 
177572 



OQOOOO 



000000 



nooooo 



OQOOOO 

000000 

000000 

000000 

000000 

000000 000000 

177.572 



060000 

025630 001110 

177572 



000000 
177572 



060000 

060002 060000 
025674 001110 
177572 



OOOOOO 
177572 



060000 

025726 001110 

177572 



3$ 



4$ 



5$; 



SOB 
MOV 
INC 
CMP 
CMP 
Ct'P 
CMP 
CMP 
CMP 
CMP 
CMP 
CMP 
CMP 
CMP 
CMP 
CMP 
CMP 
CMP 
CMP 
CMP 
CMP 
CMP 
CMP 
CMP 
CMP 
CMP 
CMP 
CMP 
CL.^ 
TEST 

CLR 
MOV 
MOV 
INC 
BIS 
BIS 
BIS 
BIS 
BIS 
CLR 
TEST 

MOV 
MOV 
MOV 
Ii^l 
MOV 
MOV 
MOV 
CLR 



R2,21l 
,*^6C000.R0 

(ftO). (R0> 

(R0.>,(RO) + 

tH0),3(R0)+ 

(R0),S-(R0) 

(HO),a0(RO) 

(R0)4,(R.j) 

(RU)^,(RO)+ 
(RO)+,a(RO)+ 
(RO)+.a-(R0) 
(HO)+,aO(RO) 
ii(R0; + ,(RO) 

a;RO)+,(RO)+ 
a(RO)>,a(RO)+ 

S^RO)sa-(RO) 

a(HO)+.aO(RO) 

a-(RO),(RO) 
a-(RO),(RO)+ 

a~(RO),a(RO)+ 
a-(RO),a-(RO) 
a-(RO),ao(RO) 

30(R0),(R0) 
aO(RO),(RO)+ 

ao(RO),a(RO)+ 
ao(Ro^a-(RO) 

f^0(R0),a0(R0) 
MMRO 
HOP OEST MOD AND 



RC 

#60000. R1 
^4$,$LPERR 
MMRO 
R0,(R1) 
R0,(R1)+ 
RO,a(Rl)+ 
R0,a-(R1) 
RO.aO(R1) 
MWRO 
MOV DEST AND 



TURN 

SRCM= 

sri:m= 

SRCM= 
SRCM= 
SRCM= 
SRCM= 
SRCM= 
SRCM= 
SR CM= 
SRCM= 
SRCM= 
SR l'M= 
SRCM= 
SRCM= 
SRCM= 
SRCM- 
SRCM= 
SR CM= 
SR CM= 
SRCM= 
SRCM= 
SRCM= 
SRCM=: 
SR CM= 
SRCM= 
TURN 
NOT SUB; 



ON MEMORY MANAGEMENT 
I DSTM:=1 DOP DEST NON-MOD 
1 DSTM=2 DOP DEST NON-MOD 
1 DSTM=3 DOP DEST NON-MOD 
1 DSTM=5 DOP DEST NON-MOD 

1 DSTM=7 DOP DEST NON-MOD 

2 DSTM=1 DOP DEST NON-MOD 
2 DSTM=2 DOP DEST NON-MOD 
2 DSTM=3 DOP DEST NON-MOD 
2 DSTM=5 DOP DEST NON-MOD 

2 DSTM=7 DOP DEST NON-MOD 

3 DSTM=1 DOP DEST NON-MOD 
3 DSTM=:2 DOP DEST NON-MOD 
3 DSTM=3 DOP DEST NON-MOD 
3 DSTM=5 DOP DEST NON-MOD 
3 DSTM=7 DOP DEST NON-MOD 
5 DSTM=1 DOP DEST NON-MOD 
5 DSTM=2 DOP DEST NON-MOD 
5 DSTM=3 DOP DEST NON-MOD 
5 DSTM=5 DOP DEST NON-MOD 
5 DSrM=7 DOP DEST NON-MOD 
7 DSTM=1 DOP DEST NON-MOD 
7 DSTM=2 DOP DEST NON-MOD 
7 DSTM=3 DOP DEST NON-MOD 
7 DSTM=5 DOP DEST NON-MOD 
7 DSTM=7 DOP DEST NON-MOD 
OFf MEMORY MANAGEMENT 

DSTM=1,2.3,5,7 



SET UP CONSTANTS FOR TEST 



SET LOOP ON ERROR POINTER TO 4$ 
TURN ON MEMORY MANAGEMENT 
DSTM=1 DOP DEST MOD 
DSTM=2 DOP DEST MOD 
DSTM=3 DOP DEST MOD 
DSTM=5 DOP DEST MOD 
DSTM=7 DOP DEST MOD 
JURN OFF MEMORY MANAGEMENT 
NOT(SMO AND DMO); DSTM-5,5,7 



#60000. R1 

#60002. a#60000 

#5$,$LPERR 

MMRO 

R0.a(R1)+ 

RO.a-(RI) 

RO.aO(RI) 

MMRO 



TEST SWAB; DSTM=1 ,2.3,5, ? 



;SET UP CONSTANTS FOR TEST 

;SET LOOP ON ERROR POINTER TO 5$ 
;TURN ON MEflORY MANAGEMENT 
;DSTM=3 MOV DEST 
;DSTM:--5 MOV DEST 
;DSTM=7 MOV DEST 
TURN OFF MEMORY MANAGEMENT 



6$: 



MOV #60000. R1 

MOV #6$.$LPERR 

INC MMRO 

SWAB (R1) 



SET UP CONSTANTS FOR TEST 
SET LOOP ON ERROR POINTER TO 6$ 
TURN ON MEMORY MANAGEMENT 
DSTM=1 SWAB 



J 



CKKTBDO n/4^ MEM M6MT PRT B 
TEST # 15 - ENABLE D-SPACE AND 



MACRO Mm 3 12-JAN-82 12:19 PAGE 
SEE I-SPACE IS NOT FORCED 



E 8 
74-2 



SEQUEfJCE 95 



3110 

3111 

3112 

3113 

31U 

3115 

3116 

3117 

3118 

3119 

3120 

3121 

3122 

3123 

3124 

3125 

3126 

3127 

3128 

3129 

3130 

3131 

3132 

3133 

3134 

3135 

3136 

3137 

3138 

3139 

3140 

3141 

3142 

3143 

3144 

3145 

3146 

3147 

3148 

3149 

3150 

3151 

3152 

3153 

3154 

3155 

3156 

3157 

3158 

3159 

3160 

3161 

3162 

3163 

3164 

3165 

3166 



025730 
025732 
025734 
025736 
025742 



025746 
025752 
025756 
025760 
025766 
025774 
026002 
026010 
026016 
026022 
026024 
026026 
026030 
026032 
026036 



026042 
026050 
026052 
026056 
026060 
026062 
026064 
026066 
026072 



026076 
026104 
026112 
026116 
026124 
026130 
026132 
026134 
026136 
026140 
026144 



026150 
026156 
026164 
026172 
026176 
026202 
026204 
026210 



000321 
000331 
000351 
000371 
005037 



012701 
012702 
010203 
012737 
012737 
012737 
012737 
012737 
005237 
006111 
006121 
006131 
006152 
006173 
005037 



012737 
005003 
005237 
070310 
070320 
070330 
070350 
070370 
005037 



012737 
012737 
012700 
012737 
005237 
072310 
072320 
072330 
072350 
072370 
005037 



012737 
012737 
012737 
012701 
005237 
000131 
000171 
005037 



000000 
177572 



060000 
060006 

060000 
060002 
060004 
060006 
026022 
177572 



000000 
177572 



026056 
177572 



000000 
177572 



000001 
060000 
060000 
026130 
177572 



000000 
177572 



026202 
026204 
026210 
060000 
177572 

000000 
177572 



SWAB 
5UAB 

SWAB 
SWAB 
CLR 



(R1) + 

a(Ri)+ 

Si-(RI) 

aO(Rl) 

MMRO 



TEST ROT/SHFT; DSTM=1 ,2.5,5,7 



DSTM=2 SWAB 
DSTM=3 SWAB 
DST«=5 SWAB 
DSTM=7 SWAB 
TURN OFF MEMORY MANAGEMENT 



060000 
060002 
060004 
060006 
001110 



7$: 



001110 



8$; 



060000 
060002 

001110 



9$ 



001110 
060000 
060002 



10$ 
11$ 
12$ 



MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
INC 
ROL 
ROL 
ROL 
ROL 
ROL 
CLR 
TEST 

MOV 
CLR 
INC 
MUL 
MUL 
MUL 
MUL 
MUL 
CLR 
TEST 

MOV 
MOV 
MOV 
MOV 
INC 
ASH 
ASH 
ASH 
ASH 
ASH 
CLR 
TEST 

MOV 
MOV 
MOV 
MOV 
INC 
JMP 
v'MP 
CLR 



#60000, R1 

y«f60006,R2 

R2,R3 

#60000, 9*60000 

#60002,9*60002 

#60004, a#60004 

#60006, a#60006 

#7$-$LPERR 

MMRO 

(Rl) 

(Ri; + 

a(Rl)+ 

a-(R2) 

aO(R3) 



;SET UP CONSTANTS FOR TEST 



SET LOOP ON ERROR POINTER TO 7$ 
TURN ON MEMORY MANAGEMENT 
DSTM=1 ROT/SHFT 



DSTM=2 
DSTM=3 
DSTM=5 
DSTM=7 



ROT/SHFT 
ROT/SHFT 
ROT/SHFT 
ROT/SHFT 



MUL/DIV; DSTM=1,2,3,5,7 



TURN OFF MEMORY MANAGEMENT 



#8$,$LPERR 
R3 

MMRO 
(R0),R3 
(R0)+,R3 
a(R0)+,R3 
S--(R0),R3 
aO(RO),R3 
MMRO 
ASH/AShC: DSTM=1 



SET LOOP ON ERROR POINTER TO 8$ 
SET UP CONSTANT FOR TEST 
TURN ON MEMORY MANAGEMENT 
DSTM=1 MUL/DIV 
DSTM=2 MUL/DIV 
DSTM=3 MUL/DIV 
DSTM=5 MUL/DIV 
DSTM=7 MUL/DIV 



,TURN 
,2,5,5,7 



OFF MEMORY MANAGEMENT 



#l,a#60000 
#60000, a*60002 
#60000, RO 
#9$,$LPERR 
MMRO 
(R0),R3 
(R0)+,R3 
a(R0)+,R3 
a-(R0),R3 
a0(R0),R3 
MMRO 
JMP; 0STM=3,7 

#10$,$rPERR 

#n$,a#60ooo 

#12$,a#60002 
#60000, Rl 
MMRO 

a(Ri)+ 
ao(Ri) 

MMRO 



TEST JSR; DSTM=3,7 



;SET UP CONSTANTS FOR THE TEST 



SET LOOP ON ERROR POINTER TO 9$ 

TURN ON MEMORY MANAGEMENT 

DSTM=1 ASH/ASHC 

DSTM=2 ASH/ASHC 

DSTM=3 ASH/ASHC 

DSTM=5 ASH/ASHC 

DSTM=7 ASH/ASHC 

TURN OFF MEMORY MANAGEMENT 



;SET LOOP ON ERROR POINTER TO 10$ 
;SET UP CONSTANTS FOR THE TEST 



TURN ON MEMORY MANAGEMENT 

DSTM=3 JMP 

DSTM=7 JMP 

TURN OFF MEMORY MANAGEMENT 



CKKTBDO 11/A^ MEM MGMT 


PRT B 


MACRO 
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SEE IS 


3167 








3168 02621A 


012737 


026246 


001110 


3169 026222 


012737 


026250 


060000 


3170 026230 


012737 


026254 


060002 


31 "n 026236 


012701 


060000 




3172 026242 


005237 


177572 




3173 026246 


004731 






3174 026250 


004771 


000000 




5175 026254 


005037 


177572 




3176 026260 


1ir"^37 


000006 


172306 


3177 026266 


012706 


001100 





M1113 12-JAN-82 12:19 PAGE 
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MOV 




MOV 




MOV 




MOV 




INC 


13$: 


JSR 


14$: 


JSR 


15$: 


CLR 




M0V8 




MOV 



#13$,$LPERR 

/^14$,a#60000 

#15$-S#60002 

*60000,R1 

MMRO 

PC,a(R1)+ 

pc,ao(Ri) 

MMRO 

A6,KJPDR3 

/^KERSTK.KSP 



;SET LOOP ON ERROR POINTER TO U$ 
;SET UP CONSTANTS FOR THE TEST 



TURN ON MEMORY MANAGEMENT 

OSm-I JSR 

0Sm=7 JSR 

TURN Off- MEMORY MANAGEMENT 

MAKE KirnR3 RESIDENT 

RESET STACK POINTER 



ocKTSDO ^^/^^ me^ mgmt prt b 

TEST /V 16 - PROPER ENABLING OF 
3186 



3187 
3188 
3189 
3190 
3191 
3192 
3193 
3194 
3195 
3196 
3197 
3198 
3199 
3200 
3201 
3202 
3203 
320A 
3205 
3206 
3207 
3208 
3209 
3210 
3211 
3212 
3213 
32U 
3215 
3216 
3217 
3218 
3219 
3220 
3221 
322^ 
3223 
322A 
3225 
3226 
3227 
3228 
3229 
3230 
3231 
3232 



026272 
0P6274 
026300 
026306 
026314 
026322 



026326 
026330 
026332 
026334 
026340 
026346 



026352 
026360 
026364 
026370 
026374 



026400 
026406 
026412 
026416 
026422 
026426 
026434 



026440 
026446 
026454 
026460 
026464 
026470 
026474 



026500 
026506 
026512 
026516 
026522 
026526 



000004 
105037 
012737 
012737 
052737 
005237 



000400 
005700 

005200 
005037 
112737 
105037 



012737 
005237 
005737 
005037 
005037 



012737 
012700 
005237 
023710 
052730 
013737 
005037 



012737 
012737 
012700 
005237 
006137 
072337 
005037 



012737 
005237 
070037 
000337 
005037 
042737 



172222 
026326 
000022 
040000 
177572 



177572 
000006 
172206 



026364 
177572 
060000 
060000 
177572 



026416 
060000 
177572 
060000 
000000 
060002 
177572 



026464 
000001 
000001 
177572 
060000 
060000 
177572 



026512 
177572 
060000 
060004 
177572 
000002 
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001110 
172516 
177776 



172222 
001110 



001110 



060002 



001110 
060000 



001110 



172516 



S8TTL TEST # 16 - PROPER ENABLING Of S\JPIR. ^-SPk^^ 

* 1tlt-k^itii*t^if**tt**lt*i-k1iic-k'kiiii1i1tltAi(ii*i1<*lilt1r1tit1(lc1c1ii(l(1t*'k-ki(1(i(i(i(*i(1ric1(1e1e'k* 

*TEST 16 PROPER ENABLING OF SUPER. D-SPACE 

* THIS TEST CHECKS FOR PROPER ENABLING OF THE SUPERVISOR D-SPACE. 

* 

* ANY ERRORS ENCOUNTERED WILL BE RKPORTED THROUGH 'MMVEC TO 

* SUBROUTINE 'NODSPAC. 



TST16: 
20$: 



1$: 
2$: 



SCOPE 



3$ 



4$ 



5$: 



6$: 



CLRB SDPDRl 

MOV /(^1$,$LPERR 

MOV #22,W1R3 

BIS #40000, PSW 

INC MMRO 



MAKE SDPDRl NON-RESIDENT 

SET LOOP ON ERROR POINTER TO 1$ 

ENABLE 22 BIT SUPERVISOR D-SPACE 

ENABLE SUPERVISOR MODE 

'"URN ON MEMORY MANAGEMENT 



THE NEXT INSTRUCTIONS SHOULD NEVER INVOKE D-SPACE 



BR 

TST 

INC 

CLR 

MOVB 

CLR8 



2$ 

RO 

RO 

MMRO 

#6. SDPDRl 

SIPDR3 



TEST SOP INSTRUCTIONS 

MOV *3$,$LPERR 

INC MMRO 

TST S>*'60000 

CLR a*60000 

CLR MMRO 

TEST POP INSTUCTIONS 

MOV #4$,$LPERR 

MOV #60-^00, RO 

INC MMRO 

CMP aA60000,(RO) 

BIS *0,a(RO)+ 

MOV a#60002,a#60002 

CLR MMRO 



TEST ROT/SHFT AND ASH/ASHC INSTRUCTIONS 



TURN OFF MEMORY MANAGEMENT 
MAKE SDPDRl RESIDENT 
MAKE SIPDR3 NON-RESIDENT 



SET LOOP ON ERROR POINTER TO 3$ 
TURN ON MEMORY MANAGEMENT 
DSTM=3 DSTF=7 SOP NON-MOD 
DSTM=3 DSTF=7 SOP MOD 
TURN OFF MEMORY MANAGEMENT 



SET LOOP ON ERROR POINTER TO 4$ 
SET UP CONSTANT FOR TEST 
TURN ON MEMORY MANAGEMENT 
SRCM=3 DSTM=1 DOP DEST NON-MOD 
SRCM=2 DSTM=3 DOP DEST MOD 
SRCM=3 DSTM=3 MOV DEST 
TURN OFF MEMORY MANAGEMENT 



MOV *5$,$LPERR 

MOV #1,3^60000 

MOV .tf1.R0 

INC MMRO 

ROL a)t'60000 

ASH a#60000,R3 

CLR MMRO 



TEST MUL/DIV AND SWAB INSTRUCTIONS 



SET LOOP ON ERROR POINTER TO 5$ 

SET CONSTANT FOR TEST 

SET UP CONSrANr FOR TEST 

TURN ON MEMORY MANAGEMENT 

DSTM=3 ROT/SHFr 

DSTM=3 ASH/ASHC 

TURN OFF MEMORY MANAGEMENT 



MOV J*'6$.$LPERR 

INC MMRO 

MUL 3*60000, RO 

SWAB 3*60004 

CLR MMRO 

BIC *2,MMR3 



SET LOOP ON ERROR POINTER TO 6$ 

TURN ON MEMORY MANAGEMENT 

DSTM=3 MUL/DIV 

DSrM=3 SWAB 

TURN OFF MEMORY MANAGEMENT 

DISABLE SUPERVISOR D-SPACE 



H 8 
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TEST # 16 - PROPER ENABLING OF SUPER. D-SPACE 

3Z:?3 026534 112737 000006 172206 M0V8 #6,SJPDR3 ;mKE SJPDR3 RESIDENT 



I 8 
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32A2 



32A3 

32AA 

32A5 

3246 

32A7 

3248 

3249 

3250 

3251 

3252 

3253 

3254 

3255 

3256 

3257 

3258 

3259 

3260 

3261 

3262 

3263 

3264 

3265 

3266 

3267 

3268 

3269 

3270 

3271 

3272 

3273 

3274 

3275 

3276 

3277 

3278 

3279 

3280 

3281 

3282 

3285 

3284 

3285 

3286 

3287 

3288 



026542 
026544 
026550 
026556 
026564 
026572 



026576 
026600 
026602 
026604 
026610 
026616 



0^0622 
026630 
026634 
026640 
026644 



026650 
026656 
026662 
026666 
026672 
026676 
026704 



026710 
02)716 
026724 
026730 
026734 
026740 



026744 
026752 
0?6756 
Cio762 
026766 
026772 
026776 



000004 
105037 
312737 
012737 
052737 
005237 



000400 
005700 
005200 
005037 
112737 
105037 



012737 
005237 
005737 
005037 
0050:^7 



012737 
012700 
005237 
023710 
052730 
013737 
00503/ 



012737 
012737 
005237 
006137 
072337 
005037 



012737 
012700 
005237 
070037 
000337 
005037 
042737 



177622 
026576 
000021 
140000 
177572 



177572 
000006 
177606 



026634 
177572 
060000 
060000 
177572 



026666 
060000 
177572 
060000 
000000 
060002 
177572 



026730 
000001 
177572 
060000 
060000 
\1151l 



Q2t7t2 
000001 
177572 
060000 
060004 
^77572 
000001 



001110 
172516 
177776 



177622 



001110 



001110 



060002 



001110 
060000 



S8TTL 
• **** 

iTEST 
* 

* 

* 

• A- * * * 

TST17: 
20$: 



TEST # 17 - PROPER ENABLING OF USER D-SPACE 

*********************************************************** 

17 PROPER ENABLING OF USER D-SPACE 

THIS TEST CHECKS FOR PROPER ENABLING OF THE USER D-SPACE. 

ANY ERRORS ENCOUNTERED WILL BE REPORTED THROUGH 'MMVEC* TO 
SUBROUTINE 'NODSPAC. 

SCOPE 



001110 



1$ 
2$ 






3$ 



4$: 



.•* 



5$ 



6$: 



CLRB UDPDR1 

MOV #1$,$LPERR 

MOV n^ ,MMR3 

BIS #140000, PSW 

INC MMRO 



MAKE UDPDR1 NON-RESIDFNT 

SET LOOP ON ERROR POINTER TO 1$ 

ENABLE 22-BIT USER D-SPACE 

ENABLE USER MODE 

TURN ON MEMOHY MANAGEMENT 



THE NEXT INSTRUCTIONS SHOULD NEVER INVOKE D-SPACE 



BR 

TST 

INC 

CLR 

M0V8 

CLRB 



2$ 

RO 

RO 

MMRO 

*6.UDPDR1 

UIPDR3 



TEST SOP INSTRUCTIONS 

MOV *3$,$LPERR 

INC MMRO 

TST S#60000 

CLR a/f60000 

CLR MMRO 

TEST m? INSTUCTIONS 

MOV *4$.$LPERR 

MOV *60000,RO 

INC MMRO 

CMP a>«'60000,(R0) 

BIS *0,a(RO)+ 

MOV a>y60002,a#60002 

CLR MMRO 



TEST ROT/SHFT AND ASH/ASHC INSTRUCTIONS 



TURN OFF MEMORY MANAGEMENT 
MAKE UDPDR1 RESIDENT 
MAKE UIPDR3 NON-RESIDENT 



S^^ LOOP ON ERROR POINTER TO 3$ 
TURN ON MEMORY MANAGEMENT 
DSTM=3 DSTF=7 SOP NON-MOD 
DSTM=3 DSTF=7 SOP MOD 
TURN OFF MEMORY MANAGEMENT 



;SET LOOP ON ERROR POINTER TO 4$ 
;SET UP rONSTANT FOR TEST 
;TURN ON MEMORY MANAGEMENT 
;SRCM:^3 DSTM=:1 DOP DEST NON-MOD 
;SRCM=2 DSTM=3 DOP DEST MOD 
;SRCM^-3 DSTM=3 MOV DEST 
;TURN OFF MEMORY MANAGEMENT 



MOV *5$,$LPbRR 

MOV *1,a#60000 

INC MMRO 

ROL 3)^60000 

ASH a#60000,R3 

CLR MMRO 



TEST MUL/DIV AND SWAB INSTRUCTIONS 



SET LOOP ON ERROR POINTER TO 5$ 

SET CONSTANT FOR TEST 

TURN ON MEMORY MANAGEMEf'T 

DSTM=3 ROT/SHFT 

DSTM=3 ASH/ASHC 

TURN OFF MEMORY MANAGEMENT 



172516 



MOV /f6$.$LPERR 

MOV *1,R0 

INC MMRO 

MUL 3^60000. RO 

SWAB a#6000'4 

CLR MMRO 

BIC J9f1,MMR3 



SET LOOP ON ERROR POINTER TO 6$ 

SET UP CONSTANT FOR TEST 

TURN ON MEMORY MANAGEMENT 

DSTM=3 MUL/DIV 

DSTM=3 SWAB 

TURN OFF MEMORY MANAGEMENT 

DISABLE USER D-SPACE 



CKKTBDO 11 /AA MEM MGMT PRT B 
TEST # 17 - PROPER ENABLING OF 



3289 
3290 



02700A 
027012 



112737 
005057 



000006 
177776 



MACRO M1113 
USER D-SPACE 

1 77606 



12*JAN-82 12:19 PAGE 



J 
76- 



SEQUENCE 100 



Mova 

CLR 



yC6,UIPDR3 
PSW 



;MAKE UiPDR3 RESIDENT 
;RESET TO KERNAL SPACE 



CKKTBDO 11 /^A MEM HGMT PRT B 
TEST # 20 - TRAPPING IN D-oPACE 

3299 



MACRO Ml 113 
KERNAL MODE 



12-JAN-82 12:19 PAGE 



11 



8 



SEQUEWCE 101 



3300 
3301 
3302 
5303 
330A 
330S 

3306 
3507 
5308 
3309 
3310 
3311 
3312 
3313 
33K 
3315 
3316 
3517 
3318 
3319 
3320 
5321 
3522 
5323 
332'!. 
5325 
3526 
5527 
3528 
5529 
5550 
5551 
5532 
3535 
5354 



027016 
027020 
02^^024 
027052 
0270A0 
027044 
027052 
027060 
027064 



027070 
027076 
027104 
027112 
027120 
027126 
027132 
0271 34 
027140 
027144 
027150 
027156 
027162 
027166 
02717: 
027176 
027200 
027202 

027206 
027210 
027212 
027216 
027224 



000004 
004757 
012757 
012737 
005057 
01^757 
012757 
012706 
005257 



012757 
012757 
052757 
012757 
012757 
015700 
000402 
015700 
005U37 
012706 
042757 
015701 
015702 
015705 
122700 
001401 
104035 
022701 

001401 
104027 
005057 

012757 



002556 
027060 
027126 
000252 
027154 
000540 
001000 
177572 



077402 
000600 
000004 
000001 

Mini 
Mint 

MnTL 
172560 
001100 
000004 
177572 
177574 
177576 
000340 



020031 



177572 
016142 
000340 



001110 

000250 

000550 
000352 



172550 
172570 
172516 
172560 
100000 



172516 



.SBTTL TEST M 2Q - TRAPPING IN D-SPACE KERNAL MODE 

;*TEST 20 TRAPPING IN D-SPACE KERNAL MODE 
;* 

;* THIS TEST VERIFIES THAT THE ABORT VECTOR IS r^K£H FROM 

;* D-SPACE AND NOT I-SPACE. THE I-SPACE VECTOR POINTS TO 

;* 10$ AND THE D-SPACE VECTOR POINTS TO 15$. EACH PSW IH 

;* VIRTUAL 252 IS DIFFERENT SO THE PROGRAM CAN TELL WHICH 

;* AREA IT IS PICKED UP FROM. 

; ; ********************************* ***************************wiV* 

TST20; SCOPE 

TURN OF T-8IT FOR THIS TEST 
SU LOOP ON ERROR POINTER TO 1$ 
SET M.M. VEC. TO HOLD BAD VECTOR 
PSW IN 252 HAS PRIORITY OF ZERO 
SET D-SPACE M./^ VECTOR TO 350 
SET PSW PRIORITY TO 7 
SET UP KERNAL VECTOR 
TURN ON MEMORY MANAGEMENT 



JSR PCJOFF 

20$: MOV #1$,$LPERR 

MOV #10$,a#MMVEC 

CLR a^MMVEC+2 

MOV ft^'^%.^»l50 

MOV *340,a#352 

1$: MOV jCIOOO.KSP 

INC MMRO 
;NOW SET UP FOR AN ABORT IN KERNAL MODE WITH D-SPACE ENABLED 



000250 
000252 



MOV #77402. KDPDR4 

MOV *600-KDPAR4 

BIS #8IT2.MMR5 

MOV #1,KDPAR0 

MOV #-1,3^100000 

10$: MOV PSW.RO 

BR 16$ 

15$. MOV PSW,RO 

16$: CLR KDPARO 

MOV #KERSTKASP 

BIC #BIT2,MMR3 

MOV MMRO^RI 

MOV MMR1,R2 

MOV MMR2,R5 

CMP8 #540, RO 

BEO 2$ 

ERROR +55 

2$: CMP #020031, Rl 

BEO 5$ 

ERROR ^21 

5$: CLR MMr.O 

MOV #MGMERR,MMVEC 

MOV #340,MMVEC+2 



KERNAL D-SPACE PAGE 4 IS READ ONLY 

MAP D-SPACE PAGE 4 TO 12K 

ENABLE KERNAL D-SPACE MAPPING 

MAP KERNAL D PAGE TO 000100 

TRY TO WRITE TO PAGE 4 

SAVE PSW FOR COMPARE 

BRANCH TO D-SPACE READ CODE 

SAVE PSW FOR COMPARE 

REM.AP KERNAL D PAGE TO PHYSICAL 

RESET STACK POINTER AFTER D-SPACE ABORT 

TURN OFF KERNAL D-SPACE ENABLE 

SAVE MMRO FOR COMPARE 

SAVE MMRl FOR COMPARE 

SAVE MMR2 FOR COrtPARE 

DID YOU PICK CORRECT PSW 

BRANCH IF PSW IS 340 

WRONG PSW PICKED IN ABORT SEQUENCE 

EXPECTING READ ONLY ABORT 

KERNAL MODE D-SPACE PAGE 4 

BRANCH IF CONDITION IS CORRECT 

WRONG M.M. ABORT CONDITION 

CLEAR OFF MMRO FOR EXIT OF TEST 

RESTORE NORMAL M.M. TRAP VECTOR 

RESTORE TRAP PSW (PRIORI TY=7) 



L 8 



CKKTBDO 11/A^ MEM MGMT PRT R MACRO Min3 12-JAN-82 12:19 PAGE 73 



GROUP 



MOVE TO/FROM PREViCUS INSTRUCTIONS TESTS 



SEQUENCE 102 



3356 

3337 
3338 
3339 
33^0 
3541 
3542 
5543 
3344 



S6TTL GROUP 3 MOVE TO/FROM PREVIOUS INSTRUCTIONS TESTS 

ft 

* THIS GROUP OF TESTS WILL JEST ALL THE LOGIC ASSOCIATED WITK 

* THE '^IFPI". "MTPl" AND 'WFPD" INSTRUCTIONS, 

/.\./.\./.\./.\./.\*/.\./.\./.\./.\./.\,/.\./.\./.\./A./.\./.\./.\./.\./.\ 



L 



CKKTBDO 11/4''. MEM MGMT PRT 8 
TEST # 2} - MOVE FROM PREVIOUS 

3359 



MACRO Mil 13 
(SUPERVISOR) 



1^-JAN-82 
I-SPACE 



12:iy PAGR 



M 
79 



8 



SEQUENCE 103 



3360 

3361 

336c* 

3363 

3364 

3365 

3366 

3367 

3568 

3369 

3370 

3371 

3372 

3373 

3374 

3375 

3376 

3377 

3378 

3379 

3380 

3381 

338.^ 

3383 

3384 

3385 

3386 

3387 

3388 

3390 
3391 
3392 
3393 
3394 
3395 
3396 
3397 
3398 
3399 



027232 
02/234 
027240 
027246 
027254 
027262 
027266 
027272 

027276 
027304 
027312 
027314 
027320 
027322 
0273?'* 
027330 
027S32 
027334 

027336 
02/340 



027342 
027350 
027354 
027362 
027366 
027374 
027400 
027402 
027404 
027406 

027410 
027414 
027^20 
027^22 
027424 



000004 
004/37 
012737 
012737 
012737 
012700 
010037 
10503/ 

012737 
012^37 
006506 
022/06 
001407 
012600 
012701 
020001 
001403 
104023 

000401 
104025 



012737 
012700 
012737 
012702 
012737 
00473/ 
006512 
000240 
104023 
005726 

012702 
00473/ 
006522 
000240 
104023 



002060 
000001 
000600 
000600 
036514 
100000 
1/2310 

027304 
010340 

uonoo 



000700 



177572 
172350 
172250 



001110 
177776 



SeiTL TtST # 21 - MOVE FROM PREVIOUS (SUPERVISOR) I-SPACE 
*TEST 21 MOVE FROM PREVIOUS (SUPERVISOR) I-SPACE 



THIS TEST USES THE 'MFPI' INSTRUCTION TO ENSURE THAT THE PREVIOUS MODE 
IS CLOCKED CORRECTLY. THERE IS A DESCRIPTION BEFORE EACH DESTINATION 
MODE iESTED. THE TEST ITSELF IS CARRIED OUT IN SUBROUTINE MFPITS, 
WHICH USES THE MFPI INSTRUCTION CODE FOLLOWING THE JSR CALL TO EXECUTE 
THE .iST. *IMPORTANT* - ALL "NOP'S" FOLLOWING MFPI'S OF MODES 1,2. 
4 AND 5 ARE TO BE LEFT ALONE. JH^ SUBROUTINE LOADS THE TWO WORDS 
AFTER THE JSR CALL, PREPARING FOR MODES 3. 6 AND 7. 



IF THE CORRECT MODE 
WILL OCCUR AND TRAP 



(SUPERVISOR) IS NOT ENABLED A NON-RESIDENT ABORT 
TO MFPIV1, WHERE THE ERRORS ARE REPORTED. 



•k*1,1,i[-k*i(1(A-k1tiriri(ir1(*1t1rifi(i(i(t-kif1<iiiv1ii(*(1fiti(1(i;-tt1t-k*(1(1(-ki(*i1i1tii1(itii-k*cic1iicit'k1cic'k 

TST21: SCOPE 



JSR PCAPRINIT 

MOV *1,MMR0 

1$: MOV #600,KIPAR4 

MOV #600,SIPAR4 

MOV #3651 4. RO 

MOV RO.a^lOOOOO 

CLR8 K1PDR4 



;THE FOLLOWING WILL TEST DSTM=0 MFPI 



;INIT ALL PAR/PDR'S 

;TURN ON MEMORY MANAGEMENT 

;MAP KIPAR4 TO 12K 

;MAP SIPAR4 TO 12K 

;LOAD DATA PATTERN INTO RO 

;LOAD DATA PATTERN INTO PHY 60000 

;MAKE KERNEL I-SPACE PAGE 4 NON-RESIDENT 



MOV M2$,%mRH 

2$: MOV #010340, PSW 

MFPI SSP 

CMP #KERSTK,KSP 

BEQ 2i$ 

MOV (KSP)+.R0 

MOV #SUPSTK,R1 

CMP R0,fi1 

BEQ 4$ 

ERROR +23 



;SET LOOP ON ERROR POINTER TO 2$ 

;MAKE PREVIOUS MODE SUPERVISOR 

;PUT SUPERVISOR STACK POINTER UN KERNEL STACK 

;WAS SOMETHING PUSHED ON STACK AT 6$ 

;8RANCH IF NOTHING WAS PUSHED 

;POP KERNEI STACK INTO RO 

;EXPECTING TO GET 700 AS SSP 

;DID YOU GET THE RIGHT POINTER? 

;BRANCH U YOU DID 



.-WRONG THING WAS PUSHED ON STACK 
;FOR TIGHTER SCOPE LOOP, REPLACE 'SEU 4$" WITH "BR 2$" = 000764 

BR 4$ ;8RANCH TO NEXT TRY 

3$: ERROR +25 ;NOTHING PUSHED ON STACK 

;FOR TIGHTER SCOPE LOOP, REPLACE *^EQ 3$*' ABOVE WIU) 'feR 2$" - 000771 



002516 
036514 
010340 
100000 
027566 
0024o4 



001110 
002520 
002622 



;THE 

4$: 



100000 
002464 



THE 



FOLLOWING 
MOV 
MOV 
MOV 
MOV 
MOV 
JSR 
MFPI 
NOP 
ERROR 

FOLLOWING 
MOV 
JSR 
MFPI 
NO" 
ERROR 



WILL TEST DSTM=1 
#MFPILP,$LPERR 
#3651 4, RO 
#010340, MFPIPS 
#100000, R2 
#MFPIV1,MFP1VC 
PC.MFPITS 
(R?) 

+23 
(SP) + 
WILL TEST DSTM=2 
#100000, R2 
PC^MFPITS 
(R^) + 

+23 



MFPI. 
SET LOOP ON ERROR POINTEfi TO MFPILP IN SUBROUTINE 
RELOAD DATA PATTERN IN RO 
MAKE PREVIOUS MODE SUPERVISOR IN SUBROUTINE 
LOAD VIRTUAL ADDRESS INTO R2 

LOAD ADDRESS Uf THIS TEST'S TRAP CATCHER TO MFPIVC 
GO DO TEST USING MFPI INSTRUCTION FOUND 
<HERE " RFAD FROM PHYSICAL 60000 
MODE NOT 3, 6 OR 7 - NEEDED FOR SUfc tUUTINE LOAD 
RETURN IS HERE FOR ERROR - WRONG DATA WAS FETCHED 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 

MFPI. 
LOAD VIRTUAL ADDRESS INTO R2 
GO DO TEST USING MFPI INSTRUCTION FOUND 
<HERE - READ FROM PHYSICAl 60000 
MODE NOT 5, 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 
RETURN IS HERE FOR ERROR - WRONG DATA WA"^ FETCHED 















N 8 


CKKTBDO 11/'!*'; MEM MGMT 


PRT B 


MACRO M 


ni3 


12-JAN-82 


12; 19 PAGE 79-1 


TEST tf 2^ - MOVE FROH PREVIOUS 


(SUPERVISOR) 


[-SPACE 




3400 027426 


005726 








TST 


CSP) + 


3A01 








;THE 


FOLLOWING 


WILL TEST DSTM-3 


3402 027430 


004737 


002464 






JSR 


PC,MFPITS 


3403 027434 


006537 


100000 






MFPJ 


S^l 00000 


3404 027440 


104023 








ERROR 


+23 


3405 027442 


005726 








TST 


(SP) + 


3406 








;THE 


FOLLOWING 


WILL TEST 05TM=4 


3407 027444 


012702 


100002 






MOV 


J«'100002,R2 


3408 027450 


004737 


002464 






JSR 


PCMFPITS 


3409 027454 


006542 








MFPI 


-(R2) 


3410 027456 


000240 








NOP 




3411 027460 


104023 








ERROR 


+23 


3412 027462 


005726 








TST 


(SP) + 


3413 








;THE 


FOLLOWING 


WILL TEST DSTM:^5 


3414 027464 


012737 


100010 


001202 




MOV 


yV100000,$TMP2 


3415 027472 


012702 


0012U 






MUV 


#<$TMP2+2>.R2 


3416 027476 


004737 


00246 't 






JSR 


PC.MFPITS 


3417 027502 


006552 








MFPI 


a-(R2) 


3418 027504 


000240 








NOP 




3419 027506 


104023 








ERROR 


+23 


3420 027510 


005726 








TST 


iSP) + 


3421 








;THE 


FOLLOWING 


WILL TEST DSTM=6 


3422 027512 


005002 








CLR 


R2 


3423 027514 


004737 


002464 






JSR 


PCMFPITS 


3424 027520 


006562 


100000 






MFPI 


100000(R2) 


3425 027524 


104023 








ERROR 


+23 


3426 027526 


005726 








TST 


iSP)-^ 


5427 








;THE 


FOLLOWING 


WILL TEST 0STM=7 


3428 027530 


012737 


100000 


001202 




MOV 


/iflOOOOCSTMPa 


3429 027536 


012702 


001202 






MOV 


nTMP2.R2 


3430 027542 


004737 


002464 






JSR 


PCMFPITS 


3431 027546 


006572 


000000 






MFPI 


aO(R2) 


3432 027552 


104023 








ERROR 


+23 


3433 027554 


005726 








TST 


(SP)^ 


3434 027556 


112737 


000006 


172310 




M0V8 


#6,KIPDR4 


3435 027564 


000423 








BR 


TST22 



SEQUENCE 104 



POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
MFPI. 

GO DO TEST USING MFPI INSTRUCTION FOUND 

<HhRi: - READ FROM PHYSICAL 60000 

.<cTURN IS HERE FOR ERROR - WRONG DATA WAS FETCHED 

POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
MFPI. 

LOAD VIRTUAL ADDRESS INTO R2 

GO DO TEST USING "ifPl INSTRUCTION FOUND 

<HERE - READ FROM PHYSICAL 60000 

MODE NOT 3, 6 OR 7 " NEEDED FOR SU8R0U-INE LOAD 

RETURN IS HERE FOR ERROR - WRONG DAT.. WAS FETCHED 

POP EXCESS RETURN OFF STACK - LOOPING NOT DONl 

MFpr 

LOAD TEST LOC. VIRT. ADDR INTO LOC. >TMP2 

LOAD ADDR. OF $TMP2+2 INTO R2 

GO DO Tf.ST USING MFPI INSTRUCTION FOUND 

<HER^ - READ FROM PHYSICAL 60000 

MODE NOT 3, 6 0.! 7 - NEEDED FOR SUBROUTINE LOAD 

RETURN IS HERt FOR ERROR - WRONG DATA WAS FFTCHED 

POP EXCKSS RETURN OFF STACK - LOOPING NOT DONE 

MFPJ. 
MAKE REGISTER 2 h ZERO 
GO CO TEST USING MFPI INSTRUCTION FOUND 
<HERE - READ FROM PHYSICAL 60000 
RETURN IS HERE FOR ERROR - WRONG DATA WAS FETCHED 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 

MFPI. 
LOAD TEST LOC. V.A. INIO $TMP2 
LOAD ADDRESS OF STMP2 INTO R2 
GO DO TEST USING MFPI INSTRUCTION FOUND 
USE $TMP2 TO FETCH VIRTUAL ADDRESS OF 60000 
RETURN IS HERE FOR ERROR - WRONG DATA WAS FETCHED 
POP EXCESS RETURN OFF STACK " LOOPING NOT DONE 
MAKE KIPDR4 RESIDENT 
;BRANCH TO NEXT TEST 



CKKTt;DO 11 /AA MEM MGMT PRT B 
MM TRAP CATCHER FOR ABOVE TEST 



MACRO Ml 11 3 12-JAN-82 ia:19 PAGE 



B 

80 



SEQUENCE 10b 



3A37 

3A38 027566 
3^39 02757? 
3^A0 027576 
3^41 027604 

3442 027612 

3443 027620 
3444 

3445 C27622 
5446 027626 
3447 027632 



012637 
012637 
013737 
013737 
042737 
104026 

013746 
013746 
000002 



001260 
001262 
177572 
177576 
160000 



001262 
001260 



MFPiVI 



001264 
001270 
177572 



,SBTTL 

MOV 
MOV 
MOV 
MOV 
BiC 
ERROR 



MM TRAP CATCHER FOR ABOVE TEST 



(KSP)+.TRAPPC 

(KSP)*,TRAPPS 

SRO.WASSRO 

SR2,WASSR2 

#160000, SRO 

*26 



;SAV£ PC i PS OF TRAP 



;SAVE SRO FOR ERROR TYPEOUT 
;SAVE SR2 FOR ERROR TYPfcOUT 
;CLFAR ERROR BITS IN SRO AND LEAVE 
;TRitD TO READ N0N-RE3IDENT PAGE 
;FOR TIGHTER SCOPE LOOP. REPLACE 1ST MOV INSTRUCTION WITH AN "RTI" = 000002 

MOV TRAPPS.-(KSP> ;PUT PC & PS OF TRAP ON STACK 

MOV TRAPPC,"(KSP) 

RTi 



CKKTBDO n/AA MEM 
TEST # ?2 - MOVE I 

3A62 



MGMT PRT B 
ROM PREVIOUS 



MACRO M111J 12-JAN-82 
(USER) I-SPACE 



12:19 PAGE 



C 

81 



SEQUENCE 106 



3A63 
3A6A 
3A65 
3A66 
3A67 
3468 
3A69 
3470 
5471 
3472 
3473 
3474 
3475 
3476 
3477 
3478 
3479 
3480 
3481 
3482 
3483 
3484 
3485 
3486 
3487 
3488 
3489 
3490 
3491 
3492 
3493 
3494 
3495 
3496 
3497 
3498 
3499 
3500 
3501 
3502 



027634 
027636 
027642 
027650 
027654 

027660 
027666 
027674 
027702 
027704 
027712 
027716 
027720 
Q27722 
027726 
027730 
027732 

027734 
027736 



0277^0 
0277',u 
027754 
02/V60 
027'66 
027772 
027776 
030000 
030002 
0.^)'0004 

C 30006 
030012 
030016 
030020 
030022 
030024 



000004 
012700 
012737 
010037 
105037 

012737 
012737 
012737 
006506 
012737 
022706 
001007 
012600 
012701 
020001 
001403 
104023 

000401 
104025 



012737 
012737 
012700 
012737 
012702 
004737 
006512 
000240 
(04023 
005726 

012702 
004737 
006522 
000240 
104023 
005726 



036514 
000600 
100000 
172310 

027666 
030340 
030164 

016142 
001076 



000600 



177650 



001110 
177776 
000250 

000250 



002516 
030340 
056514 
030164 
100000 
002464 



001110 
002520 

002622 



100000 
002464 



SBTTL TEST it 22 - MOVE FROM PREVIOUS (USER) I-SPACE 

nEST 22 MOVti FROM PREVIOUS (USER) I-SPACE 

* 

THIS TEST USES THE 'MFPV INSTRUCTION TO ENSURE THAT THE PREVIOUS MODE 
IS CLOCKED CORRECTLY. THERE IS A DESCRIPTION BEFORE EACH DESTINATION 
MODE TESTED. THE TEST ITSELF IS CARRIED OUT IH SUBROUTINE MFPITS, 
WHICH USES THE MFPI INSTRUCTION CODE FOLLOWING THt JSR CALL TO EXECUTE 
THE TEST. *IMPORTANT* - ALL 'INOP'S" FOLLOWING n??\'S OF MODES U2, 
4 AND 5 ARE TO BE LEFT ALONE. THE SUBROUTINE LOADS THE TWO WORDS 
AFTER THE JSR CALL, PREPARING FOR MODES 3, 6 AND 7. 



IF THE CORRECT 
OCCUR AND TRAP 



MODE (USER) IS NOT ENABLED A NON-RESIDENT ABORT WILL 
TO MFPIV2, WHERE THE ERRORS ARE REPORTED. 



TST22 
1$: 



: SCOPE 



;THE 
2$; 



;FOR 

3$: 
;FOR 

4$: 



MOV #36514, RO 

MOV /r600,UIPAR4 

MOV R0,a#1 00000 

CLR8 KIPDR4 

FOLLOWING WILL TEST DSTM=0 

MOV *2$-$LPERR 

MOV *030340,PSW 

MOV #MFPIV2,MMVEC 

MFPI USP 

MOV *MGMERR,MMVEC 

CMP J(fKERSTK-2,KSP 

BNE 3$ 

MOV (KSP)+,RO 

MOV *USESTK,R1 

CMP R0,R1 

BEO 4S 

ERROR ^2Z 

TIGHTER SCOPE LOOP, REPLACE 

BR 4$ 



ERROR +25 
TIGHTER SCOPE LOOP, REPLACE 
FOLLOWING WILL TEST 
WFPILP, SLPERR 
*030340,MFPIPS 
J»'36514,R0 
#MFPIV2,MFPIVC 
#100000,R2 
PC,MFPJTS 
(R2) 



;THE 



;THE 



,THE 

MOV 

MOV 

MOV 

MOV 

MOV 

JSR 

MFPI 

NOP 

TST 
FOLLOWING 

MOV 

JSR 

MFPI 

NOP 

ERROR 

TST 
FOLLOWING 



♦23 

<SP)* 
WILL TEST 0STM=2 
#100000, R2 
PC.MFPITS 
(R2) + 



^21 
WILL TEST 



LOAD DATA PATTERN INTO RO 
MAP UIPAR4 TO 12K 
LOAD DATA PATTERN INTO PHY 60000 
MAKE KERNEL I-SPACE PAGE 4 NON-RESIDENT 
MFPI 
SET LOOP ON ERROR POINTER TO 2$ 
MAKE PREVIOUS MODE USER 

LOAD ADDRESS OF THIS TEST'S TRAP CATCHER TO MMVEC 
PUT USER STACK POINTER ON KERNEL STACK 
SET M.M. VECTOR TO NORMAL ROUTINE 
WAS SOMETHING PUSHED ON STACK BY THE MFPI? 
BRANCH TO ERROR IF POINTER 15 WRONG 
POP KERNEL STACK INTO RO 
EXPECTING TO GET 600 AS USP 
DID YOU GET THE RIGHT POINTER? 
BRANCH IF YOU DID 
WRONG THING WAS PUSHED ON STACK 
'BEQ 4$" WITH 'BR 2$" ^ 000764 
BRANCH TO NEXT TRY 
NOTHING PUSHED ON STACK 
'BNE 3$" ABOVE WITH 'BR 2$" ~ 000771 
DSTM^I MFPI. 

SET LOOP ON ERROR POINTER TO MFPILP IN SU8R0UTINE 
MAKE PREVIOUS MODE USER IN SUBROUTINE LOCATION 
RELOAD DATA PATTERN IN RO 

LOAD ADDRESS OF THIS TEST'S TRAP CATCHER TO MFPIVC 
LOAD VIRTUAL ADDRESS INTO R2 
60 DO TEST USING MFPI INSTRUCTION FOUND 
<HERE - READ FROM PHYSICAL 60000 
MODE NOT 5, 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 
RETURN IS HERE FOR ERROR - WRONG DATA WAS FETCHED 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
MFPI, 
LOAD VIRTUAL ADDRESS INFO R2 
GO DO TEST USING MFPI INSTRUCTION FOUND 
<HERE - READ FROM PHYSICAL 60000 
MODE NOT 5, 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 
RETURN IS HERE FOR ERROR - WRONG DAT\ WAS FETCHED 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
DSTM-3 MFPI. 



CKKTBDO 11/A^ MEM MGMT PRT B 
TEST ft 22 - MOVE FROM PREVIOUS 



MACRO 
(USER) 



5503 
3504 
3505 
3506 
3507 
3508 
3509 
3510 
3511 
5512 
3513 
3514 
3515 
3516 
3517 
3518 
3519 
3520 
3521 
3522 
3523 
3524 
3525 
3526 
3527 
3528 
3529 
3530 
3531 
3532 
3533 
3534 
3535 
3536 



030026 
030032 
030036 
030040 

030042 
0300^6 
030052 
030054 
030056 
030060 

030062 
030070 
030074 
030100 
030102 
030104 
030106 

030110 
030112 
030116 
030122 
030124 

030126 
030134 
030140 
030144 
030150 
050152 
030154 
030162 



004737 
006537 
104023 
005726 

012702 
004737 
006542 
000240 
104023 
005726 

012737 
012702 
004737 
006552 
000240 
104023 
005726 

005002 
004737 
006562 
10.': 025 
005726 

012737 
012702 
004737 
006572 
104023 
005726 
112757 
000423 



002464 
100000 



100002 
002464 



100000 
001204 
002464 



001202 



002A64 
100000 



100000 
001202 
002464 
000000 



001202 



000006 172510 



Ml 113 12-JAN-82 
1-SPACE 

JSR 
MFPJ 
ERROR 
TST 

;THE FOLLOWING 
MOV 
JSR 
MFPJ 
NOP 
ERROH 
TST 

;THE FOLLOWING 
MOV 
MOV 
JSR 
MFPJ 
NOP 
ERROR 
TST 

;THE FOLLOWING 
CLR 
JSR 
MFPJ 
ERROR 
JSJ 

;THE FOLLOWING 
MOV 
MOV 
JSR 
MFPJ 
ERROR 
TST 
MOVB 
BR 



12.'19 PAGE 



D 9 
81-1 



PC.MFPITS 

a/'i 00000 

+23 

WILL TEST DSTM=4 
#100002. R2 
PCMFPITS 
-{R2) 

+23 
(SP) + 
WILL TEST 0STM=5 
#100000, $TMP2 
#<$TMP2+2>,R2 
PC/^FPITS 
a"CR2) 

+25 

iSP)-^ 
WJL . TEST DSTMr6 

R2 

PCMFPJTS 

100000(R2) 

+25 

iSP)-*- 
WILL TEST DSTM^7 

#100000, $TMP2 

#$TMP2. R2 

PC^MFPJTS 

aO(R2) 

+23 

(oP)f 

#6,KJPDR4 

TST25 



SEQUENCE ^07 



GO DO TEST USING MFPJ INSTRUCTION FOUND 

<HERE - READ FROM PHYSICAL 60000 

RETURN IS EHRE FOR ERROR - WRONG DATA WAS FETCHED 

POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 

MF/-i. 
LOAD VIRTUAL ADDRESS INTO R2 
GO DO TEST USING MFPJ INSTRUCTION FOUND 
<HERE - READ FROM PHYSICAL 60000 
MODE NOT 5. 6 OR 7 " NEEDED FOR SUBROUTINE LOAD 
RETURN IS HERE FOR ERROR - WRONG DATA WAS FETCHED 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 

MFPJ. 
LOAD TEST LOC. VJRT. ADDR INTO LOC. $TMP2 
LOAD ADDR. OF $TMP2+2 INTO R2 
GO DO TEST USING MFPI INSTRUCTION FOUND 
<HERb - READ FROM PHYSICAL 60000 
MODE NOT 3, 6 OR 7 " NEEDED FOR SUBROUTINE LOAD 
RETURN l^ HERE FOR ERROR - WRONG DATA WAS FETCHED 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 

MFPI, 
MAKE REGISTER 2 A ZERO 
GO DO TEST USING MFPI INSTRUCTION FOUND 
<HEHE - READ FROM PHYSICAL 60000 

RETURN IS HERE FOR ERROR - WRONG DATA WAS FKTCHED 
POP EXCESS RETURN OFF STACK - LOOPING NOT DUNE 

MFPI. 
LOAD TEST LOC. V.A. INTO $TMP2 
LOAD ADDRESS OF $TMP2 INTO R2 
GO DO TEST USING MFPI INSTRUCTION FOUND 
USE $T«P2 TO FETCH VIRTUAL ADDRESS OF 60000 
RETURN IS HERE FOR ERROR - WRONG DATA WAS FLTCHED 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
MAKE KIPDR4 RESIDENT 
;BRANCH TO NEXT TEST 



CKKTBDO 
m TRAP 

3538 
3539 
3540 
3541 
3542 
3543 
3544 
3545 
3546 
3547 
3548 



11/44 MEM MGMT PRT B 
CATCHER FOR PREVIOUS 



MACRO Mil 13 12-JAN-82 12:19 PAGE 



E 

82 



TEST 



SEQUENCE 108 



030164 
030170 
030174 

030202 
030210 
030216 

030220 
030224 
030230 



012637 
012637 
013737 
013737 
0^2737 
104026 

013746 
013746 
000002 



001260 
001262 
177572 
177576 
160000 



001262 
001260 



MfPlV2: 



001264 
001270 
177572 



.S8TTL 

MOV 

MOV 

MOV 

MOV 

BIG 

ERROR 



MM TRAP CATCHlR FOR PREVIOUS TEST 



(KSP) + JRAPPC 
(KSP)+,TRAPPS 
SROJ'ASSRO 

sr:.wassr2 

'. 160000, SRO 
+26 



;SAVE PC % PS OF TRAP 



;SAVE SRO FOR ERROR TyPEOUT 
;SAVE SR2 FOR ERROR TYPEOUT 
; CLEAR ERROR BJTS IN SRO AND LEAVE 
;TR1ED TO REAP NON-RESIDENT PAGE 
;FOR TIGHTER oCOPF LOOP, REPLACE 1ST MOV INSTRUCTION WITH AN "RTI" 

M0\' TRAPPS,-(KSP) ;PUT PC & PS OF TRAP ON STACK 

MvfV TRAPPC.-(KSP) 

RTI 



= 000002 



CKKTBDO 11 /AA MEM MGMT PRT B 
TEST # 23 " MOVE TO PREVIOUS 

3563 



MACRO M1113 12-JAN-82 12:19 PAGE 
(SUPERVISOR) I'SPACE 



F 
83 



SEQUENCE 109 



356A 
3565 
3566 
3567 
3568 
3569 
3570 
3571 
3572 
3573 
3574 
3575 
3576 
3577 
3578 
3579 
3580 
3581 
3582 
3583 
358A 
3585 
3586 
3587 
3588 
3589 
3590 
3591 
3592 
3593 
359A 
3595 
3596 
3597 
3598 
3599 
3600 
3601 
3602 
3603 



030232 
03023A 

0302A2 
030250 
030254 
030262 
03026A 
030266 
0302 7A 
030276 
030302 
03030A 

030306 
0303 U 
030320 
030326 
030330 
030336 
030336 
0303AA 
030352 
030556 
030362 
030366 
030370 
030372 
03037A 
030376 

030A00 
030404 
030410 
030414 
030416 
030420 
030422 
030424 



000004 
012737 

012737 
012746 
012737 
006606 
006506 
Q^2?Z7 
012601 
022701 
001401 
104025 

012737 
012746 
012737 
006606 
012737 

012737 
012737 
012702 
012700 
004737 
006612 
000240 
000000 
10<024 
005726 

012700 
012702 
004737 
006622 
000240 
177776 
104024 
005726 



077406 

010340 
007777 
030614 



016142 
007777 



010340 
000700 
030614 

016142 

002654 
010340 
100000 
125252 
002626 



125252 
100000 
002626 



172210 
177776 
000250 

000250 



177776 

000250 

000250 

001110 
002656 



SBTTL TEST # 23 - MOVE TO PREVIOUS (SUPERVISOR) l-SPkZl 

*TEST 23 MOVE TO PREVIOUS (SUPERVISOR) I-SPACE 

* 



THIS TEST USES THE 'MTPI* INSTRUCTION TO ENSURE THAT THE PREVIOUS MODE 
IS CLOCKID CORRECTLY. THERE IS A DESCRIPTION BEFORE EACH DESTINATION 
MODE TFSIED. THE TEST ITSELF IS CARRIED OUT IN SUBROUTINE MFPITS, 
WHICH \}Z^S THE MTPI INSTRUCTION CODE FOLLOWING THE ^SR CALL TO EXECUTE 
THE TES;. ^IMPORTANT* - ALL 'INOP'S" FOLLOWING MTPI'S OF MODES 1,2. 
4 AND 5 ARE TO BE LEFT ALONE, THE SUeROUTJNE LOADS THE TWO WORDS 
AFTER THE >}SR CALL, PREPARING FOR MODES 3, 6 AND 7. 



IF THE CORRECT 
TRAP TO MTPI VI 



MODE IS NOT ENABLED A 
WHERE THE ERRORS ARE 



NON-RESIDENT 
REPORTED. 



ABORT WILL OCCUR AND 



**************;f**********************Hc****R****ilr *************** 

TST23: SCOPE 



030426 012700 052525 



1$: MOV 
•THE FOLLOWING 
2$: MOV 

MOV 

MOV 

MTPI 

MFPI 

MOV 

MOV 

CMP 

BEG 

ERROR 
•FOR TIGHTER 
3$: MOV 

MOV 

MOV 

MTPI 

MOV 
4$: ;THIS 

MOV 

MOV 

MOV 

MOV 

JSR 

MTPI 

NOP 

.WORD 

ERROR 

TST 
;THE FOLLOWING 

MOV 

MOV 

JSR 

MTPI 

NOP 

.WORD 

ERROR 

TST 
;THIS WILL TEST 

MOV 



#77406, S1PDR4 
WILL TEST DSTM=0 
#010340, PSW 
ff7777,-(KSP) 
#f1TPIV1,MMVEC 
SSP 
SSP 

#M6MERR,MMVEC 
(KSP)+, Rl 
#7777, R1 
3$ 
+2S 

SCOPE LOOP, REPLACE 
#010340, PSW 
#SUPSTK,-«SP) 
#«TPIV1,M«VEC 
SSP 

#MGMERR,MMVEC 
WILL TEST DSTM = 1 
#MTPILP,$LPERR 
#010340, MTPIPM 
#100000, R2 
#125252, RO 
PC-MTPITS 
(R^) 





+24 
(SP) + 
WILL TEbf DSTM=2 
#125252, RO 
#100000, R2 

pc-mtpits 
(rJ)+ 

-2 
♦ 24 

(SP)^ 

DSTM -- ^) MTPI. 

#52525, RO 



SUPERVISOR I-SPACE PAGE 4 READ/WRITE 

MTPI 
MAKE PREVIOUS MODE SUPERVISOR 
PUSH DATA ON KERNEL STACK 

LOAD ADDRESS OF THIS TEST'S TRAP CATCHER TO MMVEC 
LOAD SUPERVISOR STACK POINTER 
READ SUPERVISOR STACK POINTER 
SET M.M. VECTOR TO NO.^MAL ROUTINE 
POP KERNEL STACK INTO Rl 
WAS SUPERVISOR STACK POINTER CHANGED 
BRANCH If IT WAS 

SUPERVISOR STACK POINTER NOT CHANGED 
'BEQ 3$" WITH 'BR 2$" = 000765 
MAKE PREVIOUS MODE SUPERVISOR 
GET READY TO RESTORE SUPERVISOR S- POINT 
LOAD ADDRESS OF THIS TEST'S TRAP CATCI.cR TO MMVEC 
RESTORE SUPERVISOR STACK POINTER 
SET M.M. VECTOR TO NORMAL ROUTINE 
MTPI. 

SET LOOP ON ERROR POINTER TO MTPILP IN SIBROUTINE 
MAKE PREVIOUS MODE SUPER IN LOCATION IN SUOROUTINE 
LOAD VIRTUAL ADDRESS INTO R2 
LOAD TEST DATA INTO RO 

GO DO THE TEST USING THE MTPI INSTRUCTION FOUND 
<HERE - LOAD TEST DATA INTO PHYSICAL 6O00O 
NOT MODE 3. 6 OR 7 - NEEDED FOR SUBRODTINE LOAD 
ADD TO R2 AFTER MTPI INSTRUCTION EXLLUTE 
RETURN IS HERE FOR ERROR - INCORRECT STORE 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 

MTPI. 
LOAD TEST DATA INTO RO 
lOAD VIRTUAL ADDRESS INTO R2 

ow :0 THE TEST USING fHE MTPI INSTRUCTION FOUND 
<HERE - LOAD TEST DATA INTO PHYSICAL 6O00O 
NOT MODE 3. 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 
ADD -2 TO R2 AFTER MTPI INSTRUCTION EXECUTE 
RETURN IS HERE FOR ERROR - INCORRECT STORE 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 

LOAD TEST DATA INTO RO 



CKKTBDO 11 /4A MEM MGMT PRT B 
TEST # 23 - MOVE TO PREVIOUS 



MACRO Mil 13 12-JAN-82 12:19 PAGE 
(SUPERVISOR) I-SPACE 



G 9 
83-1 



3604 
3605 
3606 
3607 
3608 
3609 
3610 
3611 
3612 
3613 
36U 
3615 
5616 
3617 
3618 
3619 
3620 
3621 
3622 
3623 
3624 
3625 
3626 
3627 
3628 
3629 
3630 
3631 
3632 
3633 
3634 
3635 
3636 
3637 
3638 
3639 
3640 
3641 
3642 
3643 
3644 
3645 
3646 
3647 
3648 
3649 
3650 
3651 
3652 
3653 
3654 
3655 
3656 



030452 
030436 
030442 
030444 
030446 

030450 
030454 
050460 
030464 
030466 
030470 
C30472 
030474 

030476 
030502 
030506 
030514 
030520 
030522 
030524 
030526 
030530 

030532 
030536 
030540 
030544 
030550 
03^55? 
03u554 

030556 
030562 
030570 
030574 
030600 
030604 
0306C6 
030610 
030612 

030614 
030620 
030624 
030632 
030640 
030646 

030650 
030654 
030660 



004737 
006637 
000000 
104024 
005726 

012700 
012702 
004737 
006642 
000240 
000000 
104024 
005726 

012700 
012702 
012737 
004737 
006652 
000240 
076576 
104024 
005726 

012700 
005002 
004737 
006662 
100000 
104024 
005726 

012700 

012702 
004737 
006672 
076576 
104024 
005726 
000423 

012637 
012637 
013737 
013737 
042737 
104024 

013746 
013746 
000002 



002626 
100000 



125252 
100002 
002626 



052525 
001204 
100000 
002626 



052525 

002626 
100000 



125252 
100000 
001202 
002626 
000000 



001260 
001262 
177572 
177576 
160000 



001262 
001260 



001202 



001202 



JSR 
MTPI 
.WORD 
tRROR 
TST 
;THJS WILL TEST 
MOV 
MOV 
JSR 
MTPI 
NOP 
.WORD 

TST 
;THE FOLLOWING 
MOV 
MOV 
MOV 
JSR 
MTPI 
NOP 
.WORD 
ERROR 
TST 
;THIS WILL TEST 
MOV 
CLR 
JSR 
MTPI 
.WORD 
ERROR 
TST 
;7HE FOLLOWING 
MOV 
MOV 
MOV 
JSR 
MTPI 
.WORD 
ERROR 
TST 
BR 



PCjMTPITS 

a^lfl 00000 



^24 

(SP) + 

DSTM = ^ MTPI. 

#125252, RO 

*100002,R2 

PCMTPITS 

-(R2) 



*24 
(SP) + 
WILL TEST DSTM=5 
*52525-RO 
#<$TMP2+2>,R2 
#100000, $TMP2 
PCMTPITS 
a-(R2) 

100000-$TMP2 

+24 

{SP) + 

DSTM = 6 MTPI. 

#52525, RO 

R2 

PCMTPITS 

100000(R2) 

100000 

+24 

WILL TEST DSTM=7 
#125252, RO 
#100000, $TMP2 
#$TMP2,R2 
PCMTPITS 
aO(R2) 

100000-$TMP2 
+24 
(SP)* 
TST24 



SEQUENCE 110 



GO DO JHZ TEST USING THE MTPI INSTRUCTION FOUND 
<HERE - LOAD TEST DATA INTO PHYSICAL 60000 
ADO TO R2 AFTL-R MTPI INSTRUCTION EXECUTE 
RETURN IS HERE FOR ERROR - INCORRECT STORE 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 

LOAD TEST DATA INTO RO 
LOAD VIRTUAL ADDRESS INTO R2 

GO DO THE TEST USING THE MTPI INSTRUCTION FOUND 
<HERE - LOAD TEST DATA INTO PHVSICAL 60000 
NOT MODE 3, 6 OR 7 " NEEDED FOR SUBROUTINE LOAD 
ADD TO R2 AFTER MTPI INSTRUCTION EXECUTE 
HEJURi^ IS HERE FOR ERROR - INCORRECT STORE 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
MTPI. 
LOAD TEST DATA INTO RC 
LOAD ADDR. OF LOC. $TMP2+2 INTO R2 
LOAD VIRT. ADDR. OF TEST LOC. INTO $TMP2 
60 DO THE TEST USING THE MTPI INSTRUCTION FOUND 
<H^RE - LOAD TEST DATA INTO PHYSICAL 60000 
■JOT MODE 3, 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 
ADD 100000-$TMP2 TO R2 AFTER MTPI INSTRUCTION EXECUTE 
RETURN IS HERE FOR ERROR - INCORRECT STORE 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 

LOAD TEST DATA INTO RO 
MAKE REGISTER 2 ZERO 

GO DO THE TEST USING THE MTPI INSTRUCTION FOUND 
<HERE - LOAD TEST DATA INTO PHYSICAL 60000 
ADD 100000 TO R2 AFTER MTPI INSTRUCTION EXFCIJTF 
RETURN IS HERE FOR tHHUH - INCORRECT STORE 
POP EXCESS RETURN OFF STACK - LOOPING N'OT DONE 
MTPI. 
LOAD TEST DATA INTO RO 

LOAD VIRT. ADDR. OF TEST LOCATION INTO LOCATION $TMP2 
LOAD ADDRESS OF $TMP2 INTO R2 

GO DO TftE TEST USING THE MTPI INSTRUCTION 'OUND 
<HERE " LOAD TEST DATA INTO PHYSICAL 60000 
ADD 100000"$TMP2 TO R2 AFTER MTPI INSTRUCTION rxECUTt 
RETURN IS HERE FOR ERROR - INCORRECT STORE 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
;BRANtH TO NEXT TEST 



001264 
001270 
177572 



MTPI VI: MOV 
MOV 
MOV 
MOV 
BIC 
ERROR 



(KSP)+,TRAPPC 
^Ki>P) + ,TRAPPS 
SRCWASSRO 
SR2,WASSR2 
#160000, SRO 
*24 



;SAVE PC £ PS OF TRAP 



;SAVE SRO FOR ERROR TYPEOUT 
;SAV£ SR2 FOR ERROR TYPEOUT 
.-CLEAR ERROR BITS IN SRO 

. u^ ;TRIED TO LOAD A N.R, PAGE -; 

;FOR TIGHTER SCOPE LOOP, REPLACE 1ST MOV INSTRUCTION WITH AN "RTl" = 000002 

MOV TRAPPS,-(KSP) ;PUT PC I PS OF TRAP ON STACK 

MOV TRAPPC,-(KSP) 

RTI .-RETURN TO TEST 



CKKTBDO 11 AA MEM MGMT PRT B 
TEST # 24 - MOVE TO PREVIOUS 

3657 



MACRO Mil 13 
(USER) I-SPACE 



12-JAN-82 12:19 PAGE 



H 

84 



SEQUENCE 111 



3658 

3659 

3660 

3661 

3662 

3663 

366A 

3665 

3666 

3667 

3668 

3669 

3670 

3671 

3672 

3673 

367A 

3675 

3676 

3677 

3678 

3679 

3680 

3681 

3682 

3683 

3684 

3685 

3686 

368/ 

3688 

3689 

3690 

3691 

3692 

3693 

3694 

3695 

3696 

3697 



030662 
030664 
030672 

030700 
030706 
030712 
030720 
030722 
030724 
030732 
030734 
03C/40 
030742 

030744 
030752 
030756 
030764 
030766 

030774 
031002 
031010 
031016 
031022 
031026 
031032 
031034 
031036 
031040 
031042 

031044 
031050 
031054 
031060 
031062 
031064 
031066 
031070 



000004 
012737 
012737 

012737 
012746 
012737 
006606 
006506 
012737 
012601 
022701 
001401 
104025 

012737 
012746 
012737 
006606 
012737 

012737 
012737 
012737 
012702 
012700 
004737 
006612 
000240 
000000 
104024 
005726 

012700 
012702 
004737 
006622 
000240 
177776 
104024 
005726 



077406 
000600 

030340 
007777 
031260 



016142 
007777 



030340 
000600 
031260 

016142 

002654 
030340 
031260 
100000 
125252 
002626 



125252 
100000 
002626 



177610 
177650 

177776 

000250 

000250 



177776 

000250 

000250 

001110 
002656 
002744 



SBTTL TEST # 24 - MOVE TO rrtEVIO'Jl. (USER) I-SPACE 

************************** *4****lic*«k*******ik)^*A«r*)(r4rA*****:fr*AVti^*i^)^ 



*TEST 24 



MOVE TO PREVIOUS (USER) 1-SPACE 



THIS TEST USES THE 'MTPJ' INSTRUCTION TO ENSURE THAT niE PREVIOUS MODE 
IS CLOCKED CORRECTLY. THERE IS A DESCRIPTION BEFORE EACH DESTINATION 
MODE TESTED. THE TEST ITSELF IS CARRIED OUT IN SUBROUTINE MFPJTS, 
WHICH USES THE MTPI INSTRUCTION CODE FOLLOWING THE JSR CALL TO EXECUTE 
THE TEST. *IMPORTANT* - ALL "MOP'S'* FOLLOWING MTPl'S OF MODES 1.2. 
4 AND 5 ARE TO BE LEFT ALONE. THE SUBROUTINE LOADS THE TWO WORDS 
AFTER THE JSR CALL, PREPARING FOR MODES 3, 6 AND 7. 

IF THE CORRECT MODE IS NOT ENABLED A NON-RESIDENT ABORT WILL OCCUR AND 
TRAP TO MTPI VI, WHERE THE ERRORS ARE REPORTED. 



1$: 



:THE 



****f***i' ******** ************** 
TST24: SCOPE 

#77406, UIPDR4 
#600,UIPAR4 
WILL TEST DSTM=0 
/r030340,PSW 
M7777.-{KSP) 
#MTPJV2,MMVEC 
USP 
USP 

J^MCMERR^MMVEC 
(KSP)+, R1 
#7777, R1 
3$ 
+ 25 
SCOPE LOOP, REPLACE 



MOV 
MOV 
FOLLOWING 
MOV 
MOV 
MOV 
MTPJ 
MFPI 
MOV 
MOV 
CMP 
BEO 
ERROR 
FOR TIGHTER 



S$: 



;THIS 



;THE 



MOV 
MOV 
MOV 
MTPI 
MOV 
WILL TEST 
MOV 
MOV 
MOV 
MOV 
MOV 
JSR 
MTPI 
NOP 
.WORD 
ERROR 
TST 
FOLLOWING 
MOV 
MOV 
JSR 

mpi 

NOP 
.WORD 
ERROR 
TST 



#030340, PSW 

#US£STK,"(KSP) 

#MTPIV2,MMVEC 

USP 

#H6MERR-MMVEC 

DSTM = 1 MTPI. 

#MTPILP.$LPERR 

#030340, MTPIPM 

#MTPIV2,MTPIVC 

#100000, R2 

#125252, RO 

PC-MTPITS 

(R2) 


+24 

(SP) + 
WILL TEST D5TM=2 
#125252, RO 
#100000. R2 
PC.MTPITS 
(R2) + 

-2 

+24 
{SP) + 



*************** V ***************** 

USER I-SPACE PAGE ^ READ/WRITE 
MAP USER I PAGE 4 TO l2K 
MTPI 
MAKE PREVIOUS MODE USta 
PUSH DATA ON KERNEL SMCK 
SET M.M. VECTOR TO 205 
LOAD USER STACK POINTER 
READ USER STACK POJfJTER 
RESTORE MM VECTOR TO NORMAL ROUTINE 
POP KERNEL STACK INTO R1 
WAS USER STACK POINTER CHANGED 
BRANCH IF IT WAS 
USER STACK POINTER NOT CHANGED 
•BEO 3$" WITH 'BR :$" = 000765 
MAKE PREVIOUS MOr.: USER 
GET READY TO RESTORE USER S. POINT 
SET M.M. VECTOR TO 20$ 
RESTORE USER STACK POINTER 
RESTORE MM VECTOR TO NORMAL ROUTINE 

SET LOOP ON ERROR POINTER TO MTPILP IN SUBROUTINE 
SET PREVIOUS MODE = USER IN SUBROUTINE LOCATION 
SET THIS TEST'S MM TRAP HANDLER IN MTPIVC 
LOAD VIRTUAL ADDRESS INTO R2 
LOAD TEST OATA INTO RO 

GO DO TEST USING MTPI INSTRUCTION LOCATED 
<HERE - LOAD TEST DATA INTO PHYSICAL 60000 
NOT MODE 3. 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 
ADD TO RJ AFTER MTPI INSTRUCTION EXECUTE 
RETURN IS HERE FOR ERROR - INCORRECT STORE 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
MTPI. 
LOAD TEST DATA INTO RO 
LOAD VIRTUAL ADDRESS INTO R2 
60 DO TEST USING MTPI INSTRUCTION LOCATED 
<HERE - LOAD TEST DATA INTO PHYSICAL 60000 
NOT MODE 3, 6 OR 7 " NEEDED FOR SUBROUTINE LOAD 
ADD -2 TO R2 AFTER MTPI INSTRUCTION EXECUTE 
RETURN IS HERE FOR ERROR - INCORRECT STORE 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 



CKKTBDO 11/44 MEM M6MT P.^v B 
TEST ^ 24 - MOVE TO PREVIOUS 



MACRO Mil 13 
(USER) I-SPACE 



12-JAN-82 12:19 PAGE 



I 9 
84-1 



3698 






;THJS 


WILL TEST 


DSTM = 3 MTPI. 


3699 031072 


012700 


052525 




MOV 


M52525,R0 


3700 031076 


004737 


002626 




JSR 


PC.MTPITS 


3701 031102 


006637 


100000 




MTPJ 


S/S'l 00000 


3702 031106 


000000 






.WORD 





3703 031110 


104024 






ERROR 


+24 


3704 031112 


005726 






TST 


iSP)* 


3705 






;THJS 


WJLL TEST 


DSTM = 4 MIPI, 


3706 031114 


012700 


125252 




MOV 


.^'125252,R0 


3707 031120 


012702 


100002 




MOV 


/f100002,R2 


3708 031124 


004737 


002626 




JSR 


PCMTPITS 


3709 031130 


006642 






MTPl 


-(R2) 


3710 031132 


000240 






NOP 




3711 031134 


000000 






.WORD 





3712 031136 


10402«f 






ERROR 


+24 


3713 031140 


005726 






TST 


iSP) + 


3714 






;THE 


FOLLOWING 


WILL TEST DSTMn5 


3715 031142 


012700 


052525 




MOV 


;y52525,R0 


3716 031146 


012702 


001204 




MOV 


#<$TMP2+2>,R2 


3717 031152 


012737 


100000 001202 




MOV 


#1 00000.. $THP2 


3718 031160 


004737 


002626 




JSR 


PCMTPITS 


3719 031164 


00665? 






MVP] 


^"(R2) 


3720 031166 


000240 






NOP 




3721 031170 


076576 






.WORD 


100000-$TMP2 


3722 031172 


1040.24 






ERROR 


+24 


3723 031174 


005726 






TST 


iSP)-*- 


3724 






;THJS 


WJLL TEST 


DSTM = 6 MTPI. 


3725 031176 


012700 


05t525 




MOV 


*52525,R0 


3726 031202 


005002 






CLR 


R2 


3727 031204 


004737 


002626 




JSR 


PC, MTPI TS 


3728 031210 


006662 


100000 




MTPI 


106000(R2) 


3729 031214 


100000 






.WORD 


100000 


3730 031216 


104024 






ERROR 


+24 


3731 031220 


005726 






TST 


(SP)* 


3732 






;THE 


FOLLOWING 


WILL TEST DSTM=7 


3733 031222 


012700 


125252 




MOV 


#125252, RO 


3734 031226 

3735 

3736 031234 


012737 


100000 001202 




MOV 


#100000, $TMP2 


012702 


001202 




MOV 


#$TMP2,R2 


3737 031240 


004737 


002626 




JSR 


PCMTPITS 


3738 031244 


006672 


000000 




MTPI 


aO(R2) 


3739 031250 


076576 






.WORD 


100000-$TMP2 


3740 031252 


104024 






ERROR 


+24 


3741 031254 


005726 






Tsr 


iSP)* 


3742 031256 


000423 






BR 


JSJ25 


3743 












3744 031260 


012637 


001260 


MTPJV2: MOV 


(KSP)+,TRAPPC 


3745 031264 


012637 


001262 




MOV 


(KSP)+,TRAPPS 


3746 031270 


013737 


177572 001264 




MOV 


SR0,WASSR0 


3747 031276 


013737 


177576 001270 




MOV 


SR2.WASSR2 


3748 031304 


042737 


160000 177572 




BIG 


#160000, SRO 


3749 031312 


104024 






ERROR 


+24 


3750 






;FOR 


TIGHTER SCOPE LOOP. REPLAC 


3751 031314 


013746 


001262 




MOV 


TRAPPS.-(KSP) 


3752 031320 


013746 


001260 




MOV 


TRAPPC,-(KSP) 


3753 031324 


000002 






RTI 





SEQUENCE 112 



LOAD TEST DATA INTO RO 

GO 00 TEST USING MTPI INSTRUCTION LOCATED 
<HERE - LOAD TEST DATA INTO PHYSICAL 60000 
ADD TO R2 AFTER MTPI INSTRUCTION EXECUTE 
RETURN IS HERE FOR ERROR - INCORRECT STORE 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 

LOAD TEST DATA INTO RO 
LOAD VIRTUAL ADDRESS INTO R2 
60 DO TEST USING MTPI INSTRUCTION ! OCATED 
<HERE - LOAD TEST DATA INTO PHYSIC 60000 
NOT MODE 3, 6 OR 7 - NEEDED FOR SU^^hwUTINE LOAD 
ADD TO R2 AFTER MTPI INSTRUCTION EXECUTE 
RETURN IS HERE FOR ERROR - INCORRECT STORE 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
MTPJ. 
LOAD TEST DATA INTO RO 
LOAD ADDR. OF LOC. $TMP2+2 INTO R2 
LOAD VIRT. ADDR. OF TEST LOC. INTO STMP2 
60 DO TEST USING MTPI INSTRUCTION LOCATED 
<HERE - LOAD TEST DATA INTO PHYSICAL 60000 
NOT MODE 3, 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 
ADD 100000-$TMP? TO R2 AFTER MTPJ INSTRUCTION EXECUTE 
RETURN IS HERE FOR ERROR - INCORRECT STORE 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 

LOAD TEST DATA INTO RO 
MAKE REGISTER 2 ZERO 

60 DO TEST USING MTPI INSTRUCTION LOCATED 
<HERE - LOAD TEST DATA INTO PHYSICAL 60000 
ADD 100000 TO R2 AFTER MTPI INSTRUCTION EXECUTE 
RETURN IS HERE FOR ERROR - INCORRECT STORE 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
MTPI. 
LOAD TEST DATA INTO RO 
LOAD VIRT, ADDR. OF TEST LOCATION 
INTO LOCATION $TMP2 
LOAD ADDRESS OF $TMP2 INTO R2 
GO DO TEST USING MTPI INSTRUCTION LOCATED 
<HERE LOAD TEST DATA INTO PHYSICAL 60000 
ADD 100000-$TMP2 TO R2 AFTER MTPI INSTRUCTION EXECUTE 
RETURN IS HERE FOR ERROR - INCORRECT STORE 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
;8RANCH TO NEXT TEST 

SAVE PC I PS OF TRAP 

SAVE SRO FOR ERROR TYPEOUT 
SAVE SR2 FOR ERROR TYPEOUT 
CLEAR ERROR BITS IN SRO 
TRIED TO LOAD A N.R. PAGE 4 
1ST MOV INSTRUCTION WITH AN "RTI" = 000002 
;PUT PC Z PS OF TRAP ON STACK 



;RETURN TO TEST 



CKKTBDO 11/^4 MEM MGMT PRT B 
TEST # 25 - MFPI (KERNEL) TO 

3768 
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SUPERVISOR MODE 



12-JAN-82 12:19 PAGE 



J 
85 



SEQUENCE 113 



3769 
3770 
3771 
3772 
3773 
377/. 
3775 
3776 
3777 
J778 
3779 
3780 
3781 
3782 
3783 
?78A 
3785 
3786 
3787 
3788 
3789 
3790 
3791 
3792 
3793 
379A 
3795 
3796 
3797 
3798 
3799 
3800 
5801 
3802 
3803 
380A 
3805 
3806 
3807 
3808 



031326 
031330 
031336 
031344 
031350 
031354 

031360 
031364 
031372 
031400 
031402 
031410 
0314U 
031416 
031420 
031424 
031426 
031430 

03U32 
031434 



031436 
03144^ 
031452 
031460 
031464 
031470 
031474 
031476 
031500 
031502 

031504 
031510 
031514 
031516 
031520 
031522 



000004 
012737 
012737 
012700 
010037 
012702 

105037 
012737 
012737 
006506 
012737 
022706 
001407 
012600 
012701 
020001 
00U03 
104023 

000401 
104025 



012737 
012737 

012700 
012702 
004737 
006512 
000240 
104023 
005726 

012702 
00A737 
006522 
000240 
104023 
005726 



S8TTL TEST # 25 - MFPI (KERNEL) TO SUPERVISOR MODE 

*TEST 25 MFPI (KERNEL) TO SUPERVISOR MODE 

* 

THIS TEST CHECKS THAT U THE PREVIOUS MODE IS KERNEL THE FETCH IS FROM 
KERNEL SPACE. THERE IS A DESCRIPTION BEFORE EACH DESTINATIuN MODE 
TESTED. THE TEST ITSELF TS CARRIED OUT IN SUBROUTINE MFPITS, 
WHICH USES THE MFPI INSTRUCTION CODF FOLLOWING THE JSR CALL TO EXECUTE 
THE TEST. *IMPORTANT* - ALL "NOP'S" FOLLOWING MFPI'S OF MODES 1,2. 
4 AND 5 ARE TO BE LEFT ALONE. THE SIJBROUTINE LOADS THE TWO WORDS 
AFTER THE JSR CALL, PREPARING FOR MODES 3, 6 AND 7. 



I? THE CORRECT MODE IS NOT ENABLED A NON-RESIDENT ABORT WILL OCCUR AND 
TRAP TO MFPIV3, WHERE THE ERRORS ARE REPORTED. 



031364 
0403A0 
036514 
100000 
100000 

172210 
0^03-^0 
031674 

016U2 
000700 



001100 



001110 
177776 



; *************************************************************** 

rST25: SCOPE 



MOV #1$,$LPERR 

MOV /1'0A0340,PSW 

MOV ;S'36514-R0 

MOV RO.a^lOOOOO 

MOV ^100000, R2 



SET LOOP ON ERROR TO 1$ 

GO TO SUPERVISOR MODE FOR THIS TEST 

LOAD DATA PATTERN INTO RO 

LOAD DATA PATTERN INTO PHY 60000 

LOAD VIRTUAL ADDRESS INTO R2 



;THE FOLLOWING WILL TEST DSTM=0 MFPI 



177776 
000250 

000250 



CLRB SIPDR4 

1$: MOV *040340,PbW 

MOV /l'MFPIV3,MMVEC 

MFPI KSP 

MOV *M6MERR,MMVEC 

CMP #SUPSTK,SSP 

BCQ 2$ 

MOV (SSP)+, RO 

MOV *KERSTK,R1 

CMP R0,R1 

BEQ 3$ 

ERROR +23 



MAKE SUPERVISOR I-SPACE PAGE 4 NON-RESIDENT 

MAKE PREVIOUS MODE KERNEL PRESENT SUPERVISOR 

SET M.M. VECTOR TO mPl^l 

PUT KERNEL STACK POINTER ON SUPERVISOR STACK 

RESTORE MM VECTOR TO NORMAL ROUTINE 

WAS SOMETHING PUSHED ON STACK AT THE MFPI 

BRANCH TO ERROR IF NOTHING WAS PUSHED 

POP SUPERVISOR STACK INTO RO 

EXPECTING 1100 AS KSP 

DID YOU GET THE RIGHT POINTER? 

BRANCH IF YOU DID 



002516 
0^0340 
031674 
036514 
100000 
002464 



001110 
002520 
002622 



jWRONG THING WAS PUSHED ON STACK 
;FOR TIGHTER SCOPE LOOP, REPLACE 'SEQ 3$" WITH 'BR 1$" = 000756 

BR 3$ ;BRANCH TO NEXT TRY 

2$: ERROR +25 ;NOTHING PUSHED ON STACK 

;FOR TIGHTER SCOPE LOOP, REPLACE *^EQ 2$" ABOVE WITH 'SR 1$" = 000762 
THE FOLLOWING WILL TEST DSTM-1 MFPI. 



S$: MOV *MFPILP,$LPERn 

MOV *U'*0340,MFPIP. 

MOV *MFPIV3,MFPIVC 

MOV #36514,R0 

MOV *1Q0006,R2 

JSR PC.MFPITS 

MFPI (R2) 
NOP 

ERROR ^21 

TST iSP)^ 



100000 
002464 



;THE FOLLOWING WILL TEST DSM=2 MFPI. 



SET LOOP ON ERROR POINTER TO MFPILP IN SUBROUTINE 

MAKE PREVIOUS MODE KERNEL PRESENT SUPERVISOR 

MOVE THIS TEST'S MM TRAP VECTOR TO MFPIVC 

LOAD DATA EXPECTED INTO RO 

LOAD VIRTUAL ADDRESS INTO R2 

GO DO TEST USING MFPI INSTRUCTION LOCATED 

CHERE - READ FROM PHYSICAL 60100 

NOT MODE 3, 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 

RETURN IS HERE FOR ERROR - WRUNG DATA WAS FETCHED 

POP EXCESS RETURN OFF STACK - i 00PIN6 NOT DONE 



MOV 

JSR 

MFPI 

NOP 

ERROR 

TST 



#100000,R2 
PC.MFPITS 
(R2) + 

(SP) + 



LOAD VIRTUAL ADDRESS INTO R2 

GO DO TEST USING MFPI INSTRUCTION LOCATED 
<HERE - READ FROM PHYSICAL 60000 
NOT MODE 3, 6 OR 7 - NEEDED FOR SUPROUTINE LOAD 
RETURN IS HERE FOR ERROR - WRONG DATA WAS FETCHED 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 



CKKTBDO 


11/44 MEM MGMT 


PRT B 


MACRO M' 


113 


12-JAN-82 


K 9 
12:19 PAGE 85-1 


TEST # 25 - MFPI (KERNEL) TO SUPERVISOR 


MODE 






3809 










;THE 


FOLLOWING 


WILL TEST DSTM=3 


3810 


031524 


004737 


002464 






^SR 


PCMFPITS 


3811 


031530 


006537 


100000 






MFPI 


S/f 100000 


3812 


031534 


104023 








ERROR 


+23 


3813 


031536 


005726 








TST 


iS?)"^ 


38H 










;THE 


FOLLOWING 


WILL TEST 0STM=4 


3815 


031 540 


012702 


100002 






MOV 


#100002, R2 


3816 


031544 


004737 


002464 






JSR 


PCMFPITS 


3817 


031550 


006542 








MFPI 


•-(R2) 


3818 


051552 


000240 








NOP 




3819 


031554 


104023 








ERROR 


+23 


3820 


031556 


005726 








TST 


iSP)"^ 


3821 










;THE 


FOLLOWING 


WILL TEST 0STM=5 


3822 


031560 


012737 


100000 


001202 




MOV 


yS'100000,$TMP2 


3823 


031566 


012702 


001204 






MOV 


#<$TMP2+2>,R2 


382A 


031572 


004737 


002464 






JSR 


PCMFPITS 


3825 


031576 


006552 








MFPI 


-^-{H2) 


3826 


031600 


000240 








NOP 




3827 


031602 


104023 








ERROR 


+23 


3828 


031604 


005726 








TST 


iSP)^ 


3829 










;THE 


FOLLOWING 


WILL TEST DSTM=6 


3830 


031606 


005002 








CLR 


R2 


3831 


031610 


004737 


002464 






JSR 


PC.MFPITS 


3832 


031614 


006562 


100000 






MFPI 


100000(R2) 


3833 


031620 


104023 








ERROR 


+23 


3834 


031622 


005726 








TST 


iSP)^ 


3835 










;THE 


FOLLOWING 


WILL TEST DSTM=7 


3836 


031624 


012737 


100000 


001202 




MOV 


#100000, $TMP2 


3837 


031632 


012702 


001202 






MOV 


#$TMP2.R2 


3838 


031636 


004737 


002464 






JSR 


PC.MFPITS 


3839 


031642 


006572 


000000 






MFPI 


a0(k2) 


3840 


031646 


104023 








ERROR 


^2:^ 


38 A 1 


031650 


005726 








TST 


{SP) + 


3842 


031652 


012737 


000340 


177776 




MOV 


#00340, PSW 


3843 


031660 


^M717 


000006 


172210 




M0V8 


#6,SIP0R4 


3844 


031666 


012706 


001100 






MOV 


#KERSTK,KSP 


3845 


031672 


000423 








BR 


TST26 



SEQUENCE 114 



MFPI. 
GO 00 TEST USING f^.ft'l INSTRUCTION LOCATED 
<HERE - READ FROM .PHYSICAL 60000 
RETURN IS HERE FOR ERROR - WRONG DATA WAS 
POP EXCESS RETURN OFF STACK - LOOPING NOT 

MFPI. 
LOAD VIRTUAL ADDRESS INTO R2 
GO DO TEST USING MFPI INSTRUCTION LOCATED 
<HERE - READ FROM PHYSICAL 60000 
NOT MODE 3, 6 OR 7 - NEEDED FOR SUBROUTINE 
RETURN IS HERE FOR ERROR - WRONG DATA WAS 
POP EXCESS RETURN OFF STACK - LOOPING NOT 

MFPI. 
LOAD TEST LOC. VIRT. ADDR INTO LOC. $TMP2 
LOAD ADDRESS OF STMP2+2 INTO R2 
GO DO TEST USING MFPI INSTRUCTION LOCATED 
<HERE - READ FROM PHYSICAL 60000 
NOT MODE 3, 6 OR 7 - NEEDED FOR SUBROUTINE 
RETURN IS HERE ("OR ERROR - WRONG DATA WAS 
POP EXCESS RETURN OFF STACK - LOOPING NOT 

MFPI. 
MAKE REGISTER 2 A 2ER0 

60 DO TEST USING MFPI INSTRUCTION LOCATED 
<HER£ - READ FROM PHYSICAL 60000 
RETURN IS HERE FOR ERROR - WRONG DATA WAS 
POP EXCESS RETURN OFF STACK - LOOPING NOT 

MFPI. 
LOAD TEST LOC. VIRT. ADDR. INTO $TMP2 
LOAD ADDRESS OF $TMP2 INTO R2 
GO DO TEST USING MFPI INSTRUCTION LOCATED 
<HERE - READ FROM PHYSICAL 60000 
WRONG DATA WAS FETCHED 

POP EXCESS RETURN OFF STACK - LOOPING NOT 
GO BACK TO KERNEL MODE, PREVIOUS KERNEL 
MAKE SIPDR4 RESIDENT 
RESET KERNEL STACK POINTER 
.-BRANCH TO NEXT TEXT 



FETCHED 
DONE 



LOAD 
FETCHED 
DONE 



LOAD 
FETCHED 
DONE 



FETCHED 
DONE 



DONt 



CKKTBDO 11/44 MEM MGMT PRT B 
MM TRAP ROUTINE FOR ABOVE TEST 
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L 
86 



5847 
38A8 
3849 
3850 
3851 
3852 
3853 
3854 
3855 
3856 
3857 



031674 
C31700 
031704 
031712 
031720 
031726 

031730 
031754 
031740 



012637 
012637 
013737 
013737 
042737 
104026 

013746 
013746 
000002 



001260 
001262 
177572 
177576 
160000 



001262 
001260 



.S8TTL 

MFPJV3: MOV 

MOV 

001264 MOV 

001270 MOV 

177572 BIC 

ERROR 
;FOR TIGHTER 
MOV 
MOV 
RTJ 



SEQUENCE 115 



MM TRAP ROUTINE 
(KSP)+,TRAPPC 
(/<SP) + ,TRAPPS 
SRO.WASSRO 
SR2,WASSR2 
#160000, SRO 
+26 
SCOPE LOOP, REPLACE 
TRAPPS,"(KSP) 
TRAPPC,-(KSP) 



FOR ABOVE TEST 

;SAVE PC Z PS OF TRAP 

;SAVE SRO FOR ERROR TYPEOUT 
;SAVE SR2 FOR ERROR TYPEOUT 
;CLEAR ERROR BITS IN SRO 
;TRIED TO READ NON-RESIDENT PAGE 

1ST MOV INSTRUCITON WITH AN "RTI" = 000002 
;PUT PC Z PS OF TRAP ON STACK 



;RETURN TO TEST 



CKKTBDO n/4H MEM MGMT PRT B 
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3858 
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SEQUENCE 116 



3859 
3860 
3861 
3862 
3863 
3864 
3865 
3866 
3867 
3868 
3869 
3870 
3871 
3872 
3873 
387A 
3875 
38/^6 
3877 
3878 
3879 
3880 
3881 
3882 
3883 
3884 
3885 
3886 
3887 
3888 
3889 
3890 
3891 
3892 
3893 
3894 
3895 
3896 
3897 
j898 



031742 
031/44 
031752 
031760 
031764 
031770 

031774 
032002 
032006 
032014 
032016 
032024 
032030 
032032 
032034 
032040 
03204? 
032044 

032046 
032050 



0320S2 
032U60 
032066 
032074 
032100 
032104 
032110 
032112 
032114 
032116 

032120 
032124 
032130 
032132 
032134 



000004 
012/57 
012737 
012700 
010037 
012702 

012737 
105037 
012737 
006506 
01273^ 
C22706 
001407 
012600 
012701 
020001 
001403 
104023 

000401 
104025 



012737 
012737 
012737 
012700 
012702 
004737 
006512 
000240 
104023 
005/26 

012702 
004/37 
006522 
000240 
104023 



S8TTL TEST Af 26 - MFPI (KERNEL) TO USER MODE 

*TEST 26 MFPJ (KERNEL) TO USER MODE 

* 

* THIS TEST CHECKS THAT If THE PRF^IOUS MODE IS KERNEL THE FETCH IS FROM 

* KERNEL SPACE. THERE IS> A DESCRIPTION BEFORE EACH DESTINATION MODE 

* TESTED. THE TEST ITSELF IS CARRIED OUT IN SUBROUTINE MFPITS, 

* WHICH USES THE MFPI INSTRUCTION CODE FOLLOWING THE JSR CALL TO EXECUTE 
THE TEST. *IMPORTANT* - ALL 'TNOP'S" FOLLOWING t^fPrs Of MODES 1,2, 
4 AND 5 ARE TO BE LEFT ALONE, THE SUBROUTINE LOADS THE TWO WORDS 
AFTER THE JSR CALL, PREPARING FOR MODFS 3. 6 AND 7. 



IF THE CORRECT MODE IS Nut ENABLED A NON-RESIDENT ABORT WILL OCCUR AND 
TRAP TO MFPIV4, WHERE THE ERRORS ARE REf^ORlED. 



031/52 
140340 
036514 
100000 
100000 

032304 
1V610 
140340 

016142 
000600 



001100 



oomo 

177776 



000250 
177776 
000250 



******** ***i(f****<(**iili******)^:iV*i^il|f******iifilf***** ********* ********** 

TST26: SCOPE 

SET LOOP ON LkkuR 10 1J 

GO TO USER MODE FOR THIS TEST 

LOAD DATA PATTERN INTO RO 

LOAD DATA PATTERN INTO PHY 60000 

LOAD VIRTUAL ADDRESS INTO R2 



MOV #1$-$LPERR 
1$: MOV #140340, PSW 

MOV #36514, RO 

MOV RO.ay^'IOOOOO 

MOV A'lOOOOO.R? 
;THE FOLLOWING WILL TEST DSTM=0 MFPI 



MOV 

CLR6 

MOV 

MFPI 

MOV 

CMP 

BEQ 

MOV 

MOV 

CMP 

BEQ 

ERROR 
;FOR TIGHTER SCOPE LOOI 

BR 3$ 
2$: ERROR +25 



#M^PiV4.MMVEC 

UIPDR4 

#140340, PSW 

KSP 

#MGMERR,MMVEC 

#USESTK.USP 

2$ 

(USP)+,RO 

#KERSTK,R1 

R0,R1 

3$ 

+23 



REPLACE 



SET M.M. VfCTOR TO MFPIV4 

MAKE USER I-SPACE PAGE 4 NON-RESIDENT 

MAKE PREVIOUS MODE KERNEL PRESENT USER 

PUT KERNEL STACK POINTER ON USER STACK 

RESTORE MM VECTOR TO NORMAL ROUTINE 

WAS SOMETHING PUSHED ON STACK AT THE MFPI 

BRANCH IF NOTHING WAS PUSHED 

POP USER STACK INTO RO 

EXPECTING 1100 AS KSP 

DID YOU GET THE RIGHT POINTER? 

BRANCH IF YOU DID 

WRONG THING WAS PUSHED ON STACK 

•BEQ 3$" WITH "BR 1$" = 000763 

BRANCH TO NEXT TRY 

NOTHING PUSHED ON STACK 



;FOR TIGHTER SCOPE LOOP, REPLACE "8EQ 2$" WITH *BR 1$" - 000763 



002516 
140340 
032304 
036514 
100000 
002464 



001110 
002520 
00262^ 



100000 
002464 



•THE FOLLOWING 
3$: MOV 

MOV 
MOV 
MOV 
MOV 
JSR 
MFPI 
NOP 
ERROR 
TST 
;THE FOLLOWING 
MOV 
JSR 
MFPI 
NUP 
FRROR 



WILL TEST DSTM=1 
#MFPILP,$LPERR 
#140340, M.PIPS 
#MFPJV4,MFPIVC 
#36514, RO 
#100000, R2 
PC.MFPITS 

(SP) + 
WILL TF^T n5M-2 
#100000, H2 
PC,MFPITS 
(RJ) + 

+23 



MFPI. 
SET LOOP ON ERROR POINTER TO MFPILP ir SUBROUTINE 
MAKE PREVIOUS MODE KERNEL PRESENT USEK 
MOVE THIS TEST'S MM TRAP HANDLER TO MFPIVC 
LOAD DATA EXPECTED INTO RO 
LOAD VIRTUAL ADDRESS INTO R2 
GO DO TEST USING MFPI INSTRUCTION LOCATED 
<HERE " READ FROM PHYSICAL 60000 
NOT MODE 5. 6 OR 7 - NEEDFD FOR SUBROUTINE 
WRONG DATA WAS FETCHED 

POP EXCESS RETURN OFF STACK - LOOPING NOT 
MFPL 

LOAD VIRTUAL ADDRtSS INTO R2 

GO DO TEST U:5lNG MFPI INSTRUCTION LOCATED 

<HFRE ■ READ FROM PHYSICAL 60000 

NUT MC)E 3. 6 OR / - NFfDni FOR SUBROUTINE LOAD 

RETURN IS HERE FUR ERROR - WRONG DATA WAS FtTiHED 



LOAD 
DONE 



r" 



CKKTBDO n/A'i MEM MGMT 


PRr B 


MACRO Ml 113 


12-JAN~82 


N 9 
12:19 PAGE 87-1 


lEST ff 26 - MFPl (KERNEL) TO USER RCDE 








3899 032136 


005726 








Tsr 


K^?)^ 


3900 








;THE 


FOLLOWING 


WILL TEST DSTM=3 


3901 032U0 


004737 


002464 






JSR 


PC.MFPITS 


3902 032HA 


006537 


100000 






\'^x^?l 


SySfl 00000 


3903 032150 


104023 








^m^k 


+23 


3904 032152 


005726 








TST 


kl?)^ 


3905 








;THE 


FOLLCJWir-.'G 


WILL TEST DSTM=4 


3906 0321 5A 


012/02 


100002 






MOV 


#100002, R2 


3907 032160 


004737 


002464 






JSR 


PC.MFPITS 


3908 03216^4 


006542 








MFPi 


-{RD 


5909 032166 


000240 








NOP 




3910 032170 


104023 








ERROR 


+23 


3911 032172 


005726 








TST 


(SP) + 


3912 








;THE 


FOLLOWING 


WILL TEST DSTM-5 


3913 0321 7A 


012737 


100000 


001202 




MOV 


#100000, $TMP2 


39U 032202 


012702 


001204 






MOV 


#<$TMP?+2>.R2 


5915 032206 


004737 


002464 






JSR 


PCMFPITS 


3916 032212 


006552 








MFPI 


a-(R2) 


3917 0322K 


000240 








NOP 




3918 032216 


104023 








ERROR 


+23 


3919 032220 


005726 








TST 


i^^")"^ 


3920 








;THE 


FOLI OWING 


WJ.L TEST DSTM=6 


3921 032222 


005002 








CLR 


R.' 


3922 032224 


004737 


002^64 






JSR 


P.'MfPiTS 


3923 032230 


^06562 


100000 






MF^I 


100000(R2) 


3924 032234 


104023 








L • >• . v< t 


+?3 


3925 032236 


005726 








TST 


^SP). 


3926 








;Th. 


FOLLOWING 


W LL TEST DS (i=7 


3927 032240 


012737 


100000 


001202 




MOV 


. 100000, $Ti^:p2 


3928 032246 


012702 


001202 






MOV 


A,'^MP2,R2 


3929 032252 


004737 


002464 






JSR 


PC/^FPITS 


3930 032256 


006572 


000000 






MFPI 


ao(f<.' 


3931 032262 


104023 








P»f^.,^ 


■ '^3 


3932 032264 


005726 








TST 


(S, > + 


3933 032266 


012737 


000340 


Mint 




MOV 


#00 .0 PSW 


39j4 032274 


112737 


000006 


177610 




M0V8 


#6,1 iPDR4 


3935 032302 


000423 








BR 


I ^1 



SEQUENCE 117 



POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
MFPI. 

GO DO TEST USING MFPI INSTRUCTION I OCATED 

<HERE - READ FROM PHYSICAL 60000 

WRONG DATA WAS FETCHED 

POP EXCESS RtTURN OFF STACK - LOOPING NOT DONE 
MFPI. 

LOAD VIRTUAL ADDRESS INTO R2 

60 DO TEST USING MFPI INSTRUCTION LOCATED 

<HERE - READ FROM PHYSICAL 60000 

NOT MODE 3, 6 OR 7 - NEEDED FOR SUSROUTINL LOAD 

RETURN IS HERE FOR ERROR - WRONG DATA WAS FETCHED 

POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
MFPI. 

LOAD TEST LOC. VIRT, ADDR INTO LOC. $TMP2 

LOAD ADDRESS OF $TMP2+2 INTO R2 

60 DO TEST USING MFPI INSTRUCTION I nCATFD 

<HERE - READ FROM PHYSICAL 60000 

NOT MODE 3, 6 OR 7 - NEEDED FUR SUBROUTINE LOAD 

RETURN IS HERE FOR ERROR - WRONG DATA WAS FETCHED 

POP EXCESS RETURN OFF STACK - LOOPING NOT DUNE 
MFPI. 

MAKE REGISTER 2 A ZERO 

60 DO TEST USING MFPI INSTRL'CTION LOCAl ED 

<HERE - READ FROM PHYSICAL 60000 

WRONG DATA WAS FETCHED 

POP EXCESS RETURN OFF STACK - LOOPING NOT iJONE 
MFPI. 

LOAD TEfT LOC. VIRT. ADDR, INTO $TMP? 

LOAD ADD ;ESS OF $TMP2 INTO R2 

GO DO r^ST USING MFPI INSTRUCTION LOCATED 

<HIR\. READ FROM PHYSICAL 60000 

WRONG ATA WAS FETCHED 

POP EXi-^SS RETURN OFF STACK - LOOPING NOT DONE 

60 BACf TO KERNEL MODE. PREVIOUS KERNEL 

MAKE ' iPDR4 RESIDENT 

.-P'^.-hNCH TO NEXT TEXT 



CKnTPHO 


11/44 MEM MGMT 


PRT B 


MACRO 


MM TRAP 


HANDLER 


FOR ABOVE TEST 




3937 










3938 


032304 


012637 


001260 




3939 


032310 


012637 


001262 




39^0 


032314 


013737 


177572 


001264 


3941 


I 32322 


013737 


177576 


001270 


394? 


f32330 


042737 


160000 


177572 


3943 


•32336 


104026 






3944 










394 *^ 


0"52340 


013746 


001262 




3946 


03234', 


013^46 


001260 




394/ 


032350 


000002 







Ml 11 3 12-JAN-82 12:19 PAGE 



B 10 
88 



StaUfcNCfc 118 



.SBTTL 
MFPJV4: MOV 
MOV 
MOV 
MOV 
BJC 
ERROR 
;FOR TIGHTER 
MOV 
MOV 
RTJ 



MM TRAP HANDLER 
(KSP}^,TRAPPC 
(KSP)+,TRAPPS 
SRCWASSRO 
SR2.UASSR2 
#160000, SRO 
+26 
SCOPE LOOP, REPLACE 
TRAPPS,-(<SP) 
TRAPPC,-(KSP) 



FOR ABOVE itSJ 
;SAVE PC I PS OF 



TRAP 



SAVE SRO FOR ERROR TYPEOUT 
SAVE SR2 FOR £Rfi^.< TYPEOUT 
CLEAR ERROR BITS IN SRO 
TRIED TO READ NON-RESIDENT PAGE 
1ST MOV INSTRUCTION WITH AN "RTi" = 000002 
;PUT PC I PS OF TRAP ON STAU 



;RETURN TO TEST 



CKKTBDO 11/AA MEM MGMT PRT B 
TEST IV 27 - MFPi (SUPERVISOR) 

3962 



MACRO Ml 113 12-JAN-82 12:19 PAGE 
WITH SUPER D-SPACE ENABLED 



f 10 

89 



SEQUENCE 119 



0:?2.352 


0(1000^' 




3963 05235^ 


OT '^ ' 


07/40n 


396A 






3965 032360 


O'J'-V^? 


-l,'-<70 


3966 03236A 


0100^/ 


1, '.^ 


3967 03237C 


(j 1003 7 


! ,5U 


3968 03237A 


01003/ 


V/olO 


3969 032A00 


012700 


G.;<^514 


5970 03240^ 


010037 


¥.0000 


3971 032A10 


052737 


^*0000? 172516 


3972 032A16 


105037 


i/;'=io 


3973 






3974 032A22 


012737 


0025:6 001110 


397'^ 032A30 


012737 


0103^0 002S20 


39/6 032436 


012/3/ 


032562 002622 


3977 032444 


012702 


100000 


39/8 032430 


00473/ 


002464 


3979 032454 


006512 




3980 032456 


000240 




3981 032460 


10^03/ 




3982 032462 


005/26 




3983 






3984 032464 


012/02 


100000 


3985 032470 


00</37 


002464 


3986 0324/4 


006522 




3987 0324 ''6 


000240 




3988 032500 


10403/ 




3989 03250? 


005726 




3990 






3991 032504 


012702 


100000 


399? 03?5 10 


004737 


002464 


3993 032514 


00653/ 


100000 


3994 032520 


10403/ 




3995 032522 


005726 




3996 






3997 032524 


012702 


100002 


3998 032530 


00473/ 


002464 


3999 032534 


0065^4 2 




4000 0^2536 


0002^.0 




4001 032540 


UK 03/ 




400:-' 0325^^2 


005/26 





S8TTL TEST ft 27 ~ MFPI (SUPERVISOR) WITH SUPER D-SPACE ENABLED 

*TESr 27 MFPJ (SUPERVISOR) WITH SiJPEH D-SPACE ENABLED 

THIS TEST USES THE *MfFi' INSTRUCTION TO ENSURE THAT PREVIOUS MODE IS 
CLOCK.ED CORRRECTLY, AND THAT D-SPACE IS NUT ENABLED. THE ItST ITSELF 
IS CARRIED OUT IN SUBROUTINE MFPITS- WHICH USES THE MFPI INSTRUCTION 
CODE t-OLLOyLNC THE JSR CALL TO EXECUTE THE TEST. MMPORTANT* - ALL 
'MOP'S" FOLLOWING MFPI'S OF MODES 1,2, 4 AND 5 ARE TO BE LEFT ALONE. 
THE SUBROUTINE LOADS THE TWO WORDS AFTER THE JSR CALL, PREPARING FOR 
MODES 'i, 6 AND 7. 



JF THE CORRECT MODE IS NOT ENABLED, A NON-RESIDENT ABORT WILL OCCUR AND 
TRAP TO MFPIV5, WHERE THE ERRORS ARE REPORTED. 



tST2/: SCOPE 
MOV 



Ml''' 
f-iuV 
HQV 
h[)V 
MOV 
^U^ 
CL.\'M 

.m^ FOLLOWING 
MOV 
MOV 
MOV 
MOV 
JSR 
MFPI 
NOP 
ERROR 

rsr 

;THL FULLUWING 
MOV 
JSR 
MFPI 
NOP 
ERROR 

rsr 

;THE FOLLOWING 

MOV 
JSR 
MFPi 
ERROR 

rsr 

;THt FOLLOWING 
MOV 
JSR 
MFPI 
NOP 
ERROR 

rsr 



A77400,RO 

R0,KDPDR4 
R0,SDPDR4 
R0,UDPDR4 
R0.UIPDR4 
rf36514,R0 

R0,a>y66ooo 

#8I11,MMK3 
KIPDR4 
WILL TEST DSTM-1 
#MFPJLP,$LPERR 
#010340, MFPIPS 
*MFPIV5,MFPIVC 
#100000, R2 
PC-MFPITS 
(R^) 

+37 
(SP) + 
WIIL TEST DSTM-2 
#100000. R2 

pc.mfpits 
(rJ) + 

+37 

(SP)> 
WILL TEST 05TM-3 

#100000, R2 

PC.MFPITS 

a#1 00000 

♦ 37 

(SP)^ 
WILL rcsr 0STM=4 

#100002, R2 

PCMFPITS 

-{H2) 

+ 3/ 
(SP)* 



MAKE PAGE 4 \U ALL BUT SUPERVISOR I 

AND KERNAL 1 NON-RESIDENT 

KERNAL D-SPACE PAGE 4 

SUPERVISOR D-SPACE PAGE 4 

USER D-SPACE PAGE 4 

USER I-SPACE PAGE 4 

LOAD DATA PATTERN INTO RO 

LOAD DATA PATTERN INTO PHYS. 60000 

ENABLE SUPERVISOR D-SPACE 

MAKE KERNAL I-SPACE PAGE 4 NON-RESIDENT 
MFPI. 

SET LOOP ON ERROR POINIER TO MFPILP IN SL>BROUTINE 

MAKE PREVIOUS MODE SUPERVISOR IN SUBRTN LOCATION 

MOVE THIS TEST'S flM TRAP HANDLER TU MFPIVC 

LOAD VIRTUAL ADDRESS INTO R2 

GO DO TEST USING THE MFPI INSTRUCTION FOUND 

<HERE - READ FROM PHYSICAL 60000 

NOT MODE 3, 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 

RETURN IS HERE FOR ERROR - WRONG DATA FETCHED 

POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
MFPI. 

LOAD VIRTUAL Ai)DRESS INTO R2 

GO DO TEST USING THE MFPI INSTRUCTION FOUND 

<HERE - READ FROM PHYSICAL 100000 

NOT MODE 3, 6 OR 7 - NEEDED FOR SUBROUTTgE LOAD 

RETURN IS HERE FOR ERROR - WRONG DATA FETCHED 

POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 

MFPI. 
LOAD VIRTUAL ADDRESS INTO R2 
GO DO TEST USING THE MFPI INSTRUCTION FOUND 
<HERE - READ FROM PHYSICAL 100000 
RETURN IS HtRt FOR ERROR - WRONG DATA FETCHED 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 

MFPI. 

LOAD VIRTUAL ADDRESS INTO R2 

GO DO TEST USING THE MFPI INSTRUCTION FOUND 

<HERE - READ FROM PHYSICAL 100000 

NOT MODE 3, 6 OR 7 - NEEDED FOR SUBROUriNE LOAD 

RETURN IS HERE FOR FRROR - WRONG DATA FETCHED 

POP EXCESS RETURN OFF STACK - LOOPING N01 DONE 



CKKTBDO 11/A^i MEM MG*a PRT B 
TEST H 21 ' MFPl (SUPERVISOR) 



MACRO Ml 113 17-JAN-82 12:19 
WITH SUPER D"SPAC?i ENABLED 



PAGE 



A003 0325^^ 
4005 0i2b60 



112737 
0A2737 
000A26 



000006 
000002 



172310 
172516 



N0V8 /'b^KJPDRA 

BIT A3IT1,MMR3 

Br. TST30 



D 10 
89-1 



SEQUENCE 1^0 



.-MAKE KIPDRA RESIDENT 

; DISABLE SUPERVISOR D-SPACQ 

;;8RANCH TO NEXT TEST 



CKKTBDO 11/44 MEM MGMT PRT B 
MM TRAP HANDLER FOR ABOVE lEST 



A007 
4008 
4009 
4010 
4011 
4012 
4013 
4014 
4015 
4016 
4017 
4018 



052562 
032570 
032576 
032604 
032612 
032616 
032622 

032624 
032630 
032634 



013737 
013737 
015737 
013737 
012637 
012637 
104040 

013746 
013746 
000002 



177572 
177574 
177576 
172516 
001260 
001262 



00126? 
001260 



MACRO M1113 12-JAN-82 12:19 PAGE 



E 10 
90 



SEQUENCE 121 



.S8TTL 
001264 MFP1V5: MOV 
001266 MOV 
001270 MOV 
001272 MOV 

MOV 
MOV 
ERROR 
;FOR TIGHTER 
MOV 
MOV 
RTJ 



FOR 
FOR 
FOR 
PS 



TYPEOUT 
TYPEOUT 
TYPEOUT 
TVPEOUT 



MM TRAP HANDLER 
MMRO^WASSPO 
MMR1,WASSR1 
MM.'^2,WASSR2 
MMR3,WASSR3 
(KoP; + JRAPPC 
CKSP)+ TRAPPS 

+40 ' ;TRJED TO READ NON-RESIDENT PAGE 
SCOPE LOOP, REPLACE 1ST MOV INSTRUCTION WITH AN "RTI" 
TRAPPS. "(KSP) ;PUT PC & PS OF TRAP ON STACK 
TRAPPC,-(KSP) 



F0.7 ABOVE TEST 
;SAVE MMRO FOR 
;SAVE MMR1 
;SAVE MMR2 
;SAV£ MMR3 
;SAVE PC g 



ERROR 
ERROR 
ERROR 
ERROR 
OF TRAP 



- 000002 



CKKTBDO 11/4; HEM HGHT PRT B 
TEST # 50 - MTPl (SUPERVISOR) 

^033 



MACRO Hin3 12-JAN-82 12:19 PAGE 
WITH SUPER. D"vPACE ENABLED 



F 10 
91 



SEQUfeNCE ^?2 



A03^ 
A035 
AO:?A 
^037 
A038 
A039 
AGAO 
A0A1 
A0A2 
A0A3 
^04A 
^0A5 
ADA 6 
AC;7 
A0A8 
A049 
A050 
A051 
A052 
A053 
A05A 
A055 
A056 
A057 
A058 
A059 
A060 
A06I 
A06? 
A063 
A06A 
A065 
4066 
A067 
A068 
A069 
AG 70 
A071 
4072 



03?6:^6 
053640 

052646 
052654 
032662 
032670 
032674 
032700 
032704 
032706 
052710 
032712 
032714 

032716 
052722 
052726 
032732 
032754 
052736 

052740 
052744 
052750 
052754 
052756 
032760 
052762 
032764 

052766 
052772 
052774 
033000 
033004 
053006 
055010 
053012 
033020 



000004 
052737 

012737 
012737 
012737 
012702 
012700 
0C'.757 
006612 
000240 
000000 
104 035 
005726 

012700 
004737 
006637 
COOOOO 
104035 
005726 

012700 
012702 
004737 
006642 
000240 
000000 
104035 
005726 

012700 
005r02 
004757 
006662 
100000 
104035 
005726 
042737 
000410 



SBTTL TEST * 30 - MTF I (SUPERVISOR) WITH SUPER. D-SPACE ENABLED 

*TEST 30 MTPi (SUPERVISOR) WTTH SUPER* !>-SPACE ENABLED 

* 

THIS TEST USES THE 'MTPI* INSTRUCTION TO ENSURE THAT THE PREVIOUS MODE 
IS CLOCKED CORRECTLY, AND THAT D-SPACE IS NOT ENABLED. THE TEST 
IS CARRIED OUT IN SUBROUTINE MTPITS, UHiCH USES THE MTPI INSTRUCTION 
CODE FOLLOWING THE JSR CALL TO EXECUTE THE TEST. *IMPORTANT* - ALL 
"NOP'S" FOLLOWING MTPJ'S OF MODES 1,2. 4 AND 5 ARE TO BE LEFT ALONE, 
THE SUBROUTINE LOADS THE TWO WORDS AFTER THE JSR CALL, PREPARING FOR 
MODES 5, 6 AND 7. 



ITSELF 



I^ THE CORRECT MODE 
AND TRAP TO MTPIV3, 



IS NOT ENABLED, A NON-RESIDENT ABORT WILL OCCUR AND 
WHERE fHE ERRORS ARE REPORTED, 



** A *^* A* *********** ******ilf****il[***;(****>*i**r ******** ************* 



000002 172516 



TST30; SCOPE 



002654 
010540 
033022 
100000 
125252 
002626 



052525 
002626 
100000 



125252 
100002 
002626 



001110 
002.'.'^^ 
002744 



;THIS 



THIS 



THIS 



OS2525 

002626 
100000 



000002 172516 



THIS 



BIS 
WILL TEST 

MOV 

MOV 

MOV 

MOV 

MOV 

JSR 

MTPI 

NOP 

.WORD 

^RROR 

TST 
WILL TEST 

MOV 

JSR 

MTPI 

.WORD 

^RROn 

TST 
WILL TEST 

MOV 

MOV 

JSR 

MTPI 

NOP 

.WORD 

ERROR 

TST 
WILL TEST 

MOV 

CLR 

JSR 

MTPI 

.WORD 

ERROR 

rsT 

SIC 



#BIT1,MMR3 
DSTM ^ 1 MTPI 
#MTPnP.$LPERR 
*010340,MTPIPM 
#«TPIV5,MTP1VC 
#100000, R2 
#125252, RO 
PC .MTPI TS 
(R2) 


+55 

DSrM ^ 5 MTPI 

#52525, RO 

PCMTPITS 

3#1 00000 



+35 

(SP) + 

DSTM ^ 4 MTPI 

#125252, RO 

#100002, R2 

PCMTPITS 

-(HZ) 



^35 

(SP) + 

DSTM = 6 MTPI 

#S?525,R0 

R2 

PC.MTPITS 

100000(R2) 

100000 

+55 

(SP)^ 

Jt'8ITl,MMR3 

TST31 



ENABLE SUPERVISOR D-SPACE 

SET LOOP ON e^ROR POINTER TO MTPILr' iN SUBROUTINE 

MAKE PREVIOUS MODE SUPERVISOR IN LOCATION IN SU6RTN 

LOAD THIS TEST'S MM TRAP HANDLER TO MTPIVC 

LOAD VIRTUAL ADDRESS INTO R2 

LOAD TEST DATA INTO RO 

GO DO THE TFST USING MTPI INSTRUCTION FOUND 

LOAD TEST DATA INTO PHYSICAL 100000 

<HERE - NOT MODE 5, 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 

ADD TO R2 AFTER MTPI INSTRUCTION EXECUTE 

RETURN IS HERE FOR inROR - INCORRECT STOKt 

POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 

LOAD TEST DATA INiO RO 

GO DO THE TEST USING MTPI INSTRUCTION FOUND 
<HERE - LOAD TFST DATA INTO PHYSICAL 100000 
ADD TO R2 AFTER MTPI INSTRUCTION EXECUTE 
RETURN IS HERE FOR ERROR - INCORRECT STORE 
POP EXCESS RET'JRN OFF STACK - LOOPING NOT DONE 

LOAD TEST DATA INTO RO 

LOAD VIRTUAL ADDRESS INTO R2 

GO DO THE TEST USING MTPI INSTRUCTION FOUND 

<HERE - LOAD TEST DATA INTO PHYSICAL 100000 

NOT MODE 5, 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 

ADi> TO R2 AFTER MTPI INSTRUCTION EXECUTE 

RETURN IS HERE FOR ERROR - INCORRECT STORE 

POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 

LOAD TEST DATA INTO RO 
MAKE R2 ZERO 

GO DO THE TEST USING MTPI INSTRUCTION FOUND 
<HERE - LOAD TEST DATA INTO PHYSICAL 100000 
ADD 100000 TO R2 AFTER MTPI INSTRUCTION EXECUTE 
RETURN IS HERE FOR ERROR - INCORRECT STORE 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
DISABLE SUPERVISOR D-SPACE 
.-BRANCH TO NEXT TEST 



CKKTBDO 
m TRAP 

407A 
4075 
A076 
';077 
-^.078 
A0;'9 
A080 



11/44 MEM MGMT PRT B 
HANDLER FOR ABOVE TEST 



033022 
033026 
033032 
033036 



013700 
013701 
013702 
104036 



177572 
177574 
177576 



MACRO Mil 13 12-JAN-82 12:19 PAGE 



C 10 
92 



SEQUEWCE 123 



033040 000002 



.SBTTL 
MTPJV3: MOV 
MOV 
MOV 
ERROR 
;FOR TIGHTER 
RTJ 



MM TRAP HANDLER FOR ABOVE TEST 
MMRCRO ;SAVE MMRO FOR 
MMR1,R1 ;SAVE MMR1 FOR 
MMR2,R2 ;SAVE MMR2 FOR 
+36 ; TRIED TO LOAD 

SCOPE LOOP. REPLACE 1ST MOV INSTRUCTION WITH AN 

.-RETURN TO TEST 



ERROR TYPEOUT 
ERROR TYPEOUT 
ERROR TYPEOUT 
A NON-RESIDENT 



PAGE 
"RTI" 



= 000002 



CKKTBDO 11 /AA MEM MGMT PRT B 
TEST # 31 - HTPI (USER) WITH 

A081 



MACRO Ml 113 12-JAN-82 12:19 PAGE 
USER 0-SPACE ENABLED 



H 10 
93 



SEQUENCE 124 



A082 
A08?; 
A084 

AOSS 

A086 
A087 
A088 
A089 
A090 
A091 
A092 
A093 
A09A 
409S 
A096 
A097 
A098 
A099 
A100 
A101 
A102 
4103 
A104 
A105 
4106 
4107 
4108 
4109 
4110 
4111 
4112 
4113 
4114 
4115 
4116 
4117 
4118 
4119 
4120 
4121 



033042 
033044 
033052 
033060 

033066 
033074 
033102 
033110 
033114 
033120 
033124 
033126 
033130 
033132 
033134 

033136 
033142 
033146 
033152 
033154 
033156 

033160 
033164 
033170 
033174 
033176 
033200 
033202 
033204 

033206 
033212 
033214 
033220 
033224 
033226 
033230 
033232 



000004 
012737 
012737 
052737 

012737 
012737 
012737 
012702 
012700 
004737 
006612 
0002AO 
000000 
104035 
005726 

012700 
004737 
006637 
000000 
104035 
005726 

012700 
012702 
004737 
006642 
000240 
000000 
104035 
005726 

012700 
005002 
004737 
006662 
100000 
104035 
005726 
042737 



077400 
077406 
000001 

002654 
030340 
033242 
100000 
125252 
002626 



052525 
002626 
100000 



125252 
100002 
002626 



SBTTL TEST ft Z) - MTPI (USER) WITH USER D-SPACE ENABLED 
*T£ST 31 MTPJ (USER) WITH USER D-SPACE ENABLED 



THIS TEST UScS THE 'MTPJ* INSTRUCTION TO ENSURE THAT THE PREVIOUS MODE 
IS CLOCKED CORRECTLY, AND THAT D-SPACE IS NOT ENABLED. THE TEST KSLLF 
IS CARRIED OUT IN SUBROUTINE MTPITS, UHICH USES THE MTPI INSTRUCTION 
CODE FOLLOWING THE JSR CALL TO EXECUTE THE TEST. *]MPORTANT* - ALL 
•>JOP'S" FOLLOWING MTPrs OF MODES 1,2, 4 AND 5 ARE TO BE LEFT ALONE. 
THE SUBROUTINE LOADS THE TWO WORDS AFTER THE JSR CALL, PREPARING FOR 
MODES 3, 6 AND 7. 

IF THE CORRECT MODE IS NOT ENABLED, A NON-RESIDFNT ABORT WILL OCCUR AND 
AND TRAP TO MTPIV4, WHERE THE ERRORS ARE REPORTED. 



172210 
177610 
172516 

001110 
002656 
002744 



052525 

002626 
100000 



000001 172516 



tST31: SCOPE 
MOV 
MOV 
B.J 

;THIS WILL TEST 
MOV 
MOV 
MOV 
MOV 
MOV 
JSR 
MTPI 
NOP 
-WORD 
ERROR 
fST 

;THJS WILL TEST 
MOV 
JSR 
MTPI 
.WORD 
ERROR 
TST 

;THJS WILL TEST 
MOV 
MOV 
JSR 
MTPI 
NOP 
.WORD 
ERROR 
1ST 

;THIS WILL TEST 
MOV 
CLR 
JSR 
MTPI 
.WORD 
ERROR 
TST 
BJC 



A**«^A!ftrl^****1l!**)kA!tlrA**t**)lr*ilr****ilr********«*44l^*A*i^i^ik 



#77400, S1PDR4 

*77406,UIPDR4 

#BJT0,MMR3 

DSTM = 1 MTPI 

#MTPiLP,$LPERR 

#030340, MTPIPM 

#MTPJV4,MTPIVC 

#100000, R2 

#125252, RO 

PC.MTPUS 

(R2) 


+3S 

(SP) + 

DSTM = 3 MTPI 

#52525, .^0 

PCMTPITS 

a#100000 



+35 

iSP)*- 

DSTM = 4 MTPI 

#125252. RO 

#100002, R2 

PCMTPITS 

-(R2) 

) 
35 

';p)> 

STM -: 6 MTPI 
#52525, RO 
R2 

PC.MTPITS 
100000(R2) 
100000 
+ 35 
(SP) + 
#BIT0,MMR3 



MAKE SIPDR4 NON-RESIDENT 
MAKE UIPDR4 RESIDENT 
ENABLE USER D-SPACE 

SET LOOP ON ERROR POINTER TO MTPILP IN SUBROUTINE 

MAKE LOCATION IN SUBROUTINE PREVIOUS MODE USER 

PUT THIS TEST'S MM TRAP HANDLER ADDRESS IN LOC MTPIVC 

LOAD VIRTUAL ADDRESS rNTO R2 

LOAD TEST DATA INTO RO 

GO DO TEST USING MTPI INSTRUCTION FOUND 

<HERE - LOAD TEST DATA INTO PHYSICAL 100000 

MODE MOT 3, 6 OR 7 - NEEDED FOR SUBROUTINE LUAD 

ADD TO R2 AFTER MTPI INSTRUCTION EXECUTE 

RETURN IS HERE FOR ^RHOH - INCORRECT STORE 

POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 

LOAD TEST DATA INT ) RO 
GO DO TEST USING ffPl INSTRUCTION FOUND 
<HERE - LOAD TEST DATA INTO PHYSICAL 100000 
ADD TO R2 AFTER MTPI IN.<:rRUCTION EXECUTE 
RETURN IS HPRE FOR ERROR ■ INCORRECT STORE 
POP EXCESS RLTURN OFF STACK - LOOPING NOT DONE 

LOAD TEST DATA INTO RO 

LOAD VIRTUAL ADDRESS INTO R2 

GO DO TEST USING MTPI INSTRUCTION FOUND 

LOAD TEST DATA !NTO PHYSICAL 100000 

<HERE - MODE NOT 3, 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 

ADD TO R2 AFTER MTPI INSTRUCTION EXECUTE 

RETURN IS HERE FOR ERROR - INCORRECT STORE 

POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 

LOAD TEST DATA INTO RO 
MAKE R2 :ER0 

GO DO TE T USING MTPI INSTRUCTION FOUND 
<HERE - LOAD TEST DATA INTO PHYSICAL 100000 
ADD 100000 TO R2 AFTER MTPI INSTRUCTION EXECUTE 
RETURN IS HERE FOR ERROR - INCORRECT STORE 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
DISABLE USER D-SPACE 



I 10 
CKKTBDO 11/^A MEM M6MT PRT B MACRO M1113 12-JAN-82 12:19 PAGE 93-1 SEQUENCE 125 

TEST # 31 - MTPl (USER) WITH USER D-SPACE ENABLED 

A122 0332A0 000^10 BR JSJ52 ;;8RANCH TO NEXT TEST 



CKKTBDO 11/44 MEM MGMT 


PRT 8 MACRO M' 


MM TRAP CATCHER FOR THE 


ABOVE TEST 


4124 




4125 033242 013700 


177572 


4126 033246 013701 


177574 


4127 033252 013702 


177376 


4128 033256 104036 




4129 




4130 033260 000002 





M1113 



MTPJV4: 



;FOR 









J 10 


12-JAN-82 


12:19 


PAGE 


94 


.S8TTL 


MM TRAP CATCHER 


4: MOV 


MMRO 


RO 




MOV 


MMR1 


R1 




MOV 


MMR2 


R2 




ERROR 


+36 






TIGHTER SCOPE LOOP, R 


EPLAC 


RTi 









SEQUENCE 126 



FOR THE ABOVE TEST 
;SAVE MMRO FOR ERROR TYPEOUT 
;SAVE MMR1 FOR ERROR TYPEOUT 
;SAVE MMR2 FOR ERROR TYPEOUT 
;TRIED TO LOAD A NON-RESJDENT 
; ISi MOV INSTRUCTION WITH AN 
.-RETURN TO TEST 



PAGE 4 
'*R1V' = 000002 



CKKTBDO 11/^; ME/1 MGMT PRT B MACRO M1113 
TEST # 32 - MFPI (PREVIOUS=CURRENT=KERNEL) 



12-JAN-82 12:19 PAGE 



K 10 
95 



SEQUENCE 127 



A159 



^Hl 
A1A2 
A143 

AK5 
4U6 
AH7 
A1A8 
AH9 
A150 
A151 
4152 
4153 
415A 
4155 



033262 
033264 
033272 
033276 
033302 
033304 
033306 
033310 
033312 
0333U 

033316 
033320 
033322 
033324 



000004 
112737 
005037 
012700 
010006 
006506 
011601 
020001 
001401 
104037 

005740 
020600 
001401 
104025 



000006 
177776 
001100 



172330 1$: 



S8TTL TEST * 32 - MFPI (PREVIOUS-=CURRENT=KERNEL) 

; ft ************** ****************Hr**^^*****w)V******i!f**Hf***Ht******* 

*TEST 32 MFPI (PREVIOUS=:CURRENT=KERNEL) 
* 

* THIS TEST CHECKS THAT IF BOTH PREVIOUS AND CURRENT MODES ARE KERNEL, 

* AND T/iE SOURCE MODE IS 0, THE DESTINATION STACK IS NOT DECREMENTED 

* BEFORh ACCESS. "MFPI KSP'^' SHOULD PUSH THE NON-DECREMENTED VALUE OF KSP 

* (1100) ONTO THE STACK (AT LOC. 1076). 

* 

; ********* *************♦*********/:** ft*** ************************ 

TST32: SCOPE 



033326 012706 001100 



;FOR 
2$: 



:FOR 
5$: 



MOVO ff6.Kt)PDR^ ;MAK(- KDPDR4 RESIDENT 

CLR a^PSW ;SET PREVIOUS = CURRENT = KERNEL 

MOV ^STACK,RO ;SET(fP VALUE FOR STACK POINTER 

MOV ROASP ;LOAD STACK POINTER 

MFPI KSP ;THE VALUE "STACK" SHOULD BE PUSHED BEFORE BbiNG DEC'D 

MOV (KSP),R1 ;RtAD DATA WHICH WAS PUSHED 

CMP RO,ni ;WaS THE ORIGINAL VALUE OF THE STACK POINTER PUSHED? 

BEQ 2$ ;BRANCH IF YEw 

ERROR +7; ;MFPI FETCHED WRlNG DATA 
TIGHTER SCOPE LOOP, REPLACE "BEQ 2$" WITH "B I 1$" = 000767 

TST -(RO) ;SETUP EXPECTED S ACK POINTER VALUE 

CMP KSP,RO ;WAS THE STACK PO NTER DECREMENTED? 

BEQ 3$ ;6RANCH IF YES 

ERROR +25 ;STACK NOT PU5HED LY THE MFPI 
TIGHTER SCOPE LOOP, REPLACE 'BEQ 3$" WITH 'BR i$" - 000760 

MOV ^STACK,KSP ;RESTORE STACK POINTEf. 



CKKTHDO 11/44 MPM MGMT PRT B 
TEST ft :)3 - MFPD (SUPERVISOR) 

4169 



MACRO M1113 12-JAN-82 12:19 
WITH SUPER D-SPACE ENABLED 



PAGE 



L 10 
96 



SEQUENCE 128 



4170 
4171 
4172 

41 /:s 

417/f 
417.S 
4176 
4177 
4178 
4 1 79 
4180 
4181 
418? 
4185 
4184 
4185 
4186 
'18/ 
4i''8 
418"* 
4190 
4191 
4192 
4193 
4194 
4195 
4196 
4197 
41^8 
4199 
4200 
4201 
4202 
4203 
4204 
4205 
4206 
4207 
4208 
4209 
4210 



033332 
033334 
033342 

033346 
033352 
033356 
033362 
033366 
033374 
033400 
033404 
033412 

033416 
033424 
033432 
033440 
033444 
033450 
033452 
033454 
033456 

033460 
033464 
033470 
033472 
033474 
033476 

03^500 
03^S04 
033M0 
033514 
033516 

033520 
033524 
033530 
033532 
0^3534 



000004 
1 2737 
012/00 

01003? 
010037 
010037 
010037 
012737 
012700 
010037 
052737 
105037 

012737 

012737 
012737 
01270? 
004737 
106512 
000240 
104037 
005726 

012702 
004737 
10652? 
000240 
104037 
005/26 

012702 
0047!; 
106557 
104037 
005726 

012702 
004737 
106542 
000240 
104037 



000600 
077400 

172330 
172210 
177630 
177610 
077406 
036514 
100000 
000002 
172310 

oo2:vo 

010^40 
03?S.;,4 
100000 
00274O 



100000 
002746 



100000 
002746 
100000 



100002 
002746 



S8TTL TEST # 33 - MfPD (SUPERVISOR) WITH SUPER D-SPACE ENABLED 

*TEST 33 MFPD (SUPERVISOR) WITH SUPER D-SPACE ENABLED 

* THIS TEST CHECKS TO SEE THAT THE REFERENCE IS 10 D-SPACE If THE INSRL'C 
*■ TION IS AN MFPD. THE TEST ITSELF IS CARRIEL' OUT IN SUSROUTINE MFPDTS. 

* WHICH USES THE MFPD INSTRUCTION CODE FOLLOWING THE JSR CALL lO EXECUTE 

* THF TEST. ^IMPORTANT* - ALL '^JOP'S*' Ff^LLOWING MFPD'S OF MODES 1.2, 

* 4 AND 5 ARE TO BE LEFT ALONE, THE SUBROUTINE LOADS THE TWO WORDS 

* AFTER THE JSR CALL, PREPARING FOR MODES 3, 6 ANl' 7. 



If THE CORRECT MODE 
AND TRAP TO MFPDV1, 



IS NOT ENABLED, A NON-REblDENT ABORT WILL OCCUR 
WHERE THE ERRORS ARE REPORTED. 



172270 



TST33: SCOPE 

MOV #600,SDPAR4 
20$: MOV J5f7740O,RO 



172230 
172516 



ooino 

002772 
003040 



MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
BIS 
CLRB 
;THE FOLLOWING 
MOV 
MOV 
MOV 
MOV 
JSR 
MFPD 
NOP 

TSI 
;THE FOLLOWING 
MOV 
JSR 
MFPD 
NOP 
ERROR 

Tsr 

;THE FOLLOWING 
MOV 

JSP 

Mr;-D 

ERROR 
TST 
;THE FOLLOWING 
MOV 
JSR 
MFPD 
NOP 
ERROR 



R0,KDPDR4 

R0,SJPDR4 

R0,UDPDR4 

RO.UIPDR'.' 

iC77406,SDPDR4 

#3b514,R0 

RO-ayflfiroooo 

*8IT1,MMR3 
KIPDR4 
WILL TEST DSTM=1 
#MFPDLP,$LPERR 
j4'010340,MFPDPS 
#MFP0V1,MFPDVC 
#100000, R2 
PC.MFPDTS 
(R2) 

+37 
iSP)^ 
WILL TEST DSTM=2 
#100000, R2 
PC.MFPDTS 
{R2) + 

iSP)^ 
WILL TEST DSTM=3 

#100000, R2 

PCMFPDTS 

a#l 00000 

+ 37 

(SP)* 
WILL TEST DSTM=4 

#100002, R2 

PC.MFPDTS 

-(R2) 

^57 



MAP SDPAR4 TO 1?K 

MAKE PAGE ' IN ALL BUT SUPERVISOR D 

AND KERNAL I NON-RESIDENT 

KERNAL D-SPACE PAGE 4 

SUPERVISOR I-SPACE PAGE 4 

USER D-SPACE PAGE 4 

USER I-SPACE PAGE 4 

MAKE SDPDR4 RESIDENT 

LOAD DATA PATTERN HTO RO 

LOAD DATA PAT FERN INTO PHYS. 100000 

ENABLE SUPERVISOR D-SPACE 

MAKE KERNAL I-SPACE PAGE 4 NON-RESIDENT 
MFPD 

SET LOOP ON ERROR POINTER TO MFPDLP IN SUBROUTINE 

MOVE PREVIOUS MODE--SUPERVISCR TO LOCATION IN S'JBRTN 

PUT ADDRESS OF THIS TEST'S MM TRAP CATCHER IN MFPDVC 

LOAD VIRTUAL ADDRESS INTO R2 

60 DO TEST USING THE MFPD INSTRUCTION LOCATED 

<HERE - READ FROM PHYSICAL 100000 

NOT MODE 3, 6 OR 7 - NEEDED FOR bUBROUTINE LOAD 

RETURN IS HERE FOR ERROR • WRONG DATA WAS FETCHED 

POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
MFPD 

LOAD VIRTUAL ADDRESS INTO R2 

GO DO TEST USING THE MFPD INSTRUCTION LOCATED 

<HERE - READ FROM PHYSICAL 100000 

NOT MODE 3, 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 

RETURN IS HERE FOR ERROR - WRONG DATA WAS FETCHED 

POP EXCESS RETURN OFF STACK - lOOPING NOT DONE 
MFPD 

LOAD VIRTUAL ADDRESS INTO R2 

GO DO TEST USING THE MFPD INSTRUCFION LOCATED 

<HERE - READ FROM PHYSICAL 100000 

WRONG DATA WAS FETCHED 

POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
MFPD 

LOAD VIRTUAL ADDRESS INTO Re 

GO DO TEST USING THF MFPD INSTRUCTION LOCATED 

<HERE - READ FROM PHYSICAL 100000 

NOT MODE 3, 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 

RETURN IS HERE FOR ERROR - WRONG DATA WAS FETCHED 



CKKTBDO 11 /4A MEM MGMT PftT B 
TEST ^ 33 " MFPD (SUPERVISOR) 



MACRO Ml i13 12"J/^N-82 12:19 PAGE 
WITH SUPER D-SPACE ENABLED 



M 10 
96-1 



SEQUENCE 1<f9 



A211 033536 
^2V^ 0335';0 
A215 033546 
421A 033552 

4215 033556 

4216 033562 



005726 
04273/ 
012700 
010037 
010037 
000423 



000002 
077406 
172310 
177630 



172516 



TST iS?)^ 

BIC #8Jri,MMR3 

MOV ft77^06.H0 

MOV R0,KIPDR4 

MOV R0,UDPDR4 

BR TST34 



POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 

DISABLE SUPERVISOR D-SPACE 

SET UP RO FOR 4K RESIDENT R/W 

MAKE KIPAR4 RESIDENT 

MAKE UDPDR4 HESlt)EHT 

;BRANCH TO NEXT TEST 



CKKTBDO 
MM TRAP 

4218 
4219 
4220 
4221 
4222 
4223 

4225 
4226 
4227 
4228 



11 /Vt MEM MGMT PRT B MACRO 
HANDLER FOR THE ABOVE TEST 



Mm 3 12-JAN-82 12:19 PAGE 



N 10 
97 



SEQUENCE 130 



033564 
033572 
033600 
033606 
033612 
033616 

033620 
033624 
033630 



013737 
013737 
013737 
012637 
012637 
104040 

013746 
013746 
000002 



177572 
177574 
177''76 
001260 
001262 



001262 
001260 



001264 
001266 
001270 



MFPDV1: MOV 

MOV 
MOV 
MOV 
MOV 
ERROR 



.SBTTL MM TRAP HANDLER FOR THE ABOVE ^^%'\ 



MMRCWASSRO 
MMR1,WASSR1 
MMft2,WASSR2 

(k:sp) + ,trappc 
(ksp)+,trapps 

+40 



;SAVE MMRO FO.R ERROR TYPEOUT 

;SAVE MMRI FOR ERROR TYPEOUT 

;SAVE MMR2 FOR ERROR TYPEOUT 

;SAVB K fc PS OF TRAP 



;TRIED TO READ NON-RESIDNT PAGE 
;FOR TIGHTER ^Z^?^ LOOP, REPLACE 1ST MOV INSTRUCTION WITH AN "RTI 
MOV TRAPPS.-(KSP} ;PUT PC S PS OF TRAP ON STACK 
MOV TRAPPC,-(KSP) 
RTI ;RETU/^N TU TEST 



1 1 



= 000002 



CKKTBDO 11 /4A ME/1 MGMT PR f B MACRO Ml 113 
TEST f* 'S4 - MFPl (USER/PREV USER) WITH USER 



1?-JAN-82 12:19 PAGE 
D-SPACE EN.A8LED 



B 11 
98 



SEQUENCE 131 



4240 



4241 

4?4? 

4,^4^ 

4244 

424S 

4246 

424^ 

4248 

4249 

4250 

4251 

42';2 

42S3 

42SA 

42SS 

4256 

4?S7 

42^8 

42S9 

4^60 

4261 

4262 

4263 

4264 

4265 

4266 

4267 

4268 

4269 

42/0 

42/1 

4272 

4273 

42/4 

4275 

42/6 

42/7 

42/8 

4279 

4280 



033632 
033634 
03364? 
033646 
03365? 
035660 
033664 

033670 
033676 
033704 
035/12 
033716 
033722 
03^724 
033/26 
013730 

033732 
033736 
033/42 
033/44 
033746 
033750 

033/52 
0L3756 
053/62 
033/66 
C<37/0 

0337/? 
033//6 
034002 
034004 
034006 
054010 
03401? 
034020 
034026 
054034 



000004 
012737 
012700 
010037 
052737 
10503/ 
105037 

012737 
012737 
\)^27l7 
012/0? 
004737 
006512 
000240 
104037 
005726 

012702 
004/37 
00652? 
000240 
104037 
005726 

012/0? 
004/37 
00655/ 
104037 
005/26 

0i?70? 
004737 
006542 
000240 
104037 
005726 
04?/37 
012/3/ 
112/3/ 
000423 



000600 
036SK 
100000 
000001 
172230 
172310 

002516 
170340 
034036 
100000 
002464 



inonoo 
002^64 



100000 
002464 
100000 



100002 
002464 



000001 
000340 
000006 



S8TTL TEST ft 34 - MFPI (USER/PREV USER) WITH USER D-SPACE ENABLED 
*TEST 34 MFPI (USER/PREV USER) WITH USER D-SPACE ENABLED 

* THIS TEST CHECKS THAT IF THE INSTRUCTION IS AN MFPI AND BOTH THE 

* PRESENT AND PREVIOUS MODES ARE USER, THEN D-SPACE iS USED U IT IS 
ENABLED, IN THIS WAY AN OPERATING SYSTEM CAN MAKE PROPRETARY CODE 
"EXECUTE ONLY" FOR THE USER. 



IF THE CORRECT MODE IS NOT ENABLED, A NON-RESIDENT ABORT WILL OCCUR AND 
TRAP TO MFPIV6, WHERE THE ERRORS ARE REPORTED. 



177670 
172516 



001110 
002520 
002622 



1/2516 
1////6 
172310 



1^ 1^ 1^ A fV * * * Ik Ik )^ )^ 

TST54: SCOPE 
MOV 
MOV 
MOV 
B\S 
CLR8 
CLRB 

;THE FOLLOWING 
MOV 
MOV 
MOV 
MOV 
^SR 
MFPJ 
NOP 
ERROR 
TST 

;Tnfc FOLLOWING 
NOV 

j:>r 

MFPJ 

NOP 

ERROR 

rsf 

;THE FOLLOWING 
MOV 
JSR 
MFPI 

iRRm 

TSI 
;THE FOLLOWING 
MOV 
JSR 
MFPI 
NOP 
ERROR 

Tsr 

BIC 

MOV 

MOVB 

BR 



ArilkAA:^*A:***'*4***:fc«lcJk*A***)lrA[*A**ikik***'*ik4*ik%*)k«k*A*)k**ikik 



yV600,UDPAR4 
#36514, RO 

RO,a>s'iooooo 

SDPDR4 
KIPDR4 
WILL TEST DSTM=1 
#MFPJLP.$LPFRR 
#1/0340, MFPIPS 
#MFPJV6,MFP1VC 
#100000, R2 
PC.MFPITS 
(R5) 

+3/ 

WILL FESI OSTM"? 
#100000, R2 
PC.MFPITS 
{R2)^ 

♦ 3/ 
(SP) + 

Will TEST 0STM:--3 
#100000, R2 
PC, MFPI TS 
3#1 00000 

♦ 3/ 
ISP)> 

WILL TFST DSTM=4 
#100002, R2 
PCMFPITS 
"(R2) 

+ 5/ 
(SP)* 

#8no,MM;^3 

#U0,P5W 

#6,KJPDR4 

TST35 



NON-RESIDENT 
I-SPACE PAGE 



4 NON-RESIDENT 



MAP UDPAR4 TO 12K 

LOAD DATA PATTERN INTO RO 

LOAD DATA PATTERN INTO PHYS. 100000 

ENABLE USER D-SPACE 

MAKE SDPDR4 

MAKE KERNAL 
MFPI 

SET LOOP ON ERROR POINTER TC MFPILP IN SUBROUTINE 

SET PREVIOUS AND CURRENT MODE TO LOCATION IN SU6RTN 

PUT ADDRESS OF THIS TEST'S TRAP CATCHER IN MFPIVL 

LOAD VIRTUAL ADDRESS INTO R? 

GO DO TEST USING THE MFPI INSTRUCTION LOCATED 

<HERE - READ FROM PHYSICAL 100000 

NOT mod: 3, 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 

RETURN IS HERE FOR IRHOR - WRONG DATA WAS FETCHED 

POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
MFPI 

LOAD VIRTUAL ADDRESS INTO R2 

GO DO TEST USING THE MFPI INSTRUCTION 1 OCATFD 

<HERE - READ FROM PHYSICAL lOOOOO 

NOT MODE 3, 6 OR / - NEEDED FOR SUBROUTINE LOAD 

RETURN IS HERE FOR ERROR - WRONG DATA WAS ^ETCHED 

POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
MfPI 

lOAD VJRTUAl ADDRESS INTO R? 

GO 00 TEST USING THE MFPI INSTRUCTION LOCATED 

<HFRE - READ J-ROM PHYSICAL 1O00OO 

RETURN IS HERE TOR ERROR - WRONG DA'A WAS FETCHED 

POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
MFPI 

LOAD VIRTUAL ADDRESS INTO R? 

GP DO TEST USING 'HE MFPI INSTRUCTION LOCATED 

<HERE - READ FROM PHYSICAL 100000 

NOT MODE 3, 6 OR / - NEEDED FOR SUbPOUUNE LOAD 

RETURN IS HERE FOR ERROR - WRONG DATA WAS FETCHED 

POP EXClSS return off SIACK - LOOPING NOT DONE 

DISABLE USER 0-SPACE 

MAKE PRESENT MOD> KLRNAL 

MAKE KIPDR4 RESIDENT 

;6RANLH TO NEXT TEST 



CKK.IBDO 11 /AA MEM MGMT PRT B 
MM TRAP CATCHtR FOR ABOVE TEST 



4^82 

A28A 
4285 
4?ft6 
4?87 

4288 
4289 
4290 
4291 
4292 



034036 
054044 
054052 
034060 
03406^; 
034070 

034072 
03^0/6 
034102 



01373/ 
013737 
013737 
012637 
012637 
104040 

013746 
01^/46 
000002 



177572 
177574 
177576 
001260 
00126? 



001262 
001260 



MACRO M1113 12-JAN-82 12:19 PAGE 



C 11 
99 



.SBTTL 
001264 MFPIV6: MOV 
001266 MOV 
001270 MOV 

MOV 
MOV 
ERROR 
;FOR TJCiHTER 
MOV 
MOV 
RTJ 



MM TRAP CATCHER 
fWRO.WASSRO 
MMR1,WASSR1 
MMR2,WASSR2 



FOR ABOVE TEST 
;SAVE MMRO FOR 
;5AVE MMR1 
;.SAVE MMR? 
;SAVE PC & 



SEQUENCE 132 



EHROH TYPEOUT 
FOR ERROR TYPEOUT 
FOR ERROR TYi .OUT 
PS OF TRAP 



(KSP)+,TRAPPC 
(KSP)+,TRAPPS 

+40 ; TRIED TO PEAD NON-RESIDENT PAGE 

SCOPE LOOP, REPLACE 1ST MOV INSTRUCTION UJTH AN *'ftTI" 
TRAPPS,-(KSP) ;PUT PC I PS OF TRAP ON STACK 
TRAPPC,-(KSP) 

; RE TURN TO TEST 



■■^ 000002 



CKKTBDO 11/44 MEM MGMT PRT B MACRO Mil 13 12-JAN-82 12:19 PAGE 
TF,ST # 35 - TEST CSM INSTRUCTION « ILLEGAL KERNEL MODE 



100 



r 



SEQUENCE 133 



4300 



034104 


000004 






^301 034106 


005037 


1/2516 




4302 034112 


005037 


1////6 




4303 034116 


013737 


000010 


00120'. 


4304 034124 


012737 


034140 


000010 


430S 054152 


00523/ 


1//572 




4306 034136 


007000 






430/ 034140 


013737 


001204 


000010 


4308 034146 


005037 


1 7/5/2 




4309 034152 


005037 


1/7//6 




4310 034156 


022726 


034140 




4311 034162 


001403 






4312 034164 


022626 






4313 034166 


104041 






4314 0341/0 


000401 






4315 034172 


005726 







S8TTL TEST yftf 35 - TEST c:M INS 

*TEST 55 TEST CSM iNCTRUl 

* THIS TEST CHECKS OUT THE 

* INSTRUCTION TO MAKE SURE 

* IN KERNEL MODE. 

TST35: 



1$: 



2$: 



SCOPE 




CLR 


MMR3 


CLR 


PSW 


MOV 


RrSVFC,$TMP3 


MOV 


#l$.RfcSVbC 


INC 


MMRO 


rsMO 




MOV 


$TMP3,RESVEC 


v\M 


MMRO 


riR 


P5U 


CMP 


#1$.(SP)+ 


BEQ 


2$ 


CMP 


(.SP.) + ,(SP) + 


ERROR 


H1 


8R 


T.ST36 


TST 


(vSP) + 



TRUCTJON - ILLEGAL KERNEL MODE 

AAAAAikArAAAA«tAAA*A*AA*AAA*A*AA*x*A 

ilZ;i - ILlCCAL KERNEL MODE 

CSM (CALL SUPERVISOR MODE) 
CSM IS ILLEGAL WHEN DISABLED 

^tit^lAA^^•Ai^^^A■kA^lAn■k^(AAA■k^lA^l^f^(*A*A^(^^ 

MAKE SURE H'iR3 IS CLEARED, DISABLING CSM 

MAKE Z'^:.: P.W PREVIOUS-CURRENT-KERNEL 

SAVE TRAP ; TO 10 VECTOR 

TRAPS TO 10 GO TO 1$ 

TURN ON MEMORY MANAGEMENT 

CSM RO 

RESTORE TRAPS TO 10 VECTOR 

rURN OFE MEMORY MANAGEMENT 

RETURN TO KERNEL MODE 

SEE IF IT WAS AN EXP^CJEO TRAP 

BRANCH JO RES f ORE STACK IF IT WAS 

CUHRECl STACK 

ILLEGAL CSM IMD NOT TRAP TO 10 

;8RANCH AROUND STACK CORRECTION 

CORRECT STACK 



CKKTBDO 11 /AA MEM MGMT PRT B MACRO Ml 113 12'JAN-82 Ik!; 19 PAGE 
TEST ft lb - TEST CSM INSTRUCTION - ILLEGAL SUPERVISOR MODE 



E 11 
101 



SEQUENCE 13A 



4323 



A32A 
<,S25 
A326 
A327 
A328 
A329 
A330 
A331 
A332 
A333 
A33A 
A335 
A336 
A53;' 
A338 



0341 /A 
03A176 
03A202 
O3A210 
03A216 
03A22A 
03A230 
03A232 
03A2A0 
03A2AA 
03A250 
03A25A 
03A256 
03A260 
03A262 
C3A264 



000004 
005U37 
052737 
013737 
012737 
00')237 
007000 
013737 
005037 
005037 
022726 
001403 
022626 
104041 
000401 
005726 



172516 
040000 
000010 
034232 
177572 

001204 
177572 
177776 
034232 



.SOTTL TEST # 36 - TEST CSN INS 
*TEST 36 TEST CSM INSTRUC 

* THIS TEST CHECKS OUT THE 

* INSTRUCTION TO MAKE SURE 

* IN SUPERVISOR MODE. 

•*4r*'«'«lrllr<tr**4i^iN'*)f*4'*Ar*'i^'«r**ikitr'«r'ikii^%i^ 

TST36: SCOPE 

CLR MMR3 

177776 BIS i4'40000,PSW 

001204 MOV RESVEC,$TMP3 

000010 MOV ^IS.RESVEC 

INC MMRO 

CSMO 

MOV $TMP3,RESVEC 

CLR nWRO 

CLR PSU 

CMP *1$,(SP)+ 

BEQ ?% 

CMP (SP)+,(SP)+ 

ERROR +41 

BR TST37 

TST iSP)^ 



000010 1$: 



. '^* ' 



TRUCTION - ILLEGAL SUPERVISOR MODE 

TION - ILLEGAL SUPERVISOR MODE 

CSM fCALL SUPERVISOR MODE) 
CSM IS ILLEGAL WHEN DISABLED 

MAKE SURE MMR3 IS CLEARED, DISABLINi CSM 

GO TO SUPERVISOR MODE 

SAVE TRAPS TO 10 VECTOR 

TRAPS TO 10 GO TO 1$ 

TURN ON MEMORY MANAGEMENT 

CSM RO 

RESTORE TRAPS TO 10 VECTOR 

TURN OFF MEMORY MANAGEMENT 

GO BACK TO KERNEL MODE 

SEE If IT WAS AN EXPECTED TRAP 

BRANCH AROUND ERROR CALL IF IT WAS 

CORRECT STACK 

ILLEGAL CSM DID NOT TRAP TO 10 

.■BRANCH AROUND STACK CORRECTION 

CORRECT STACK 



CKKTBDO 11/44 MEM MGMT PRT B MACRO M1113 12-JAN-82 12:19 PAGE 
TEST # 3? - TEST CSM INSTRUCTION - ILLEGAL USER MODE 



F 11 
102 



SEQUENCE 135 



4346 



434/ 
434m 
4 ".9 
4350 
4351 
4352 
4353 

435<r 

4355 
4356 
4357 
4358 

4359 
4360 
4361 



034266 
034270 
034274 
034302 
034310 
034316 
034322 
034324 
034332 
03^336 
034342 
034346 
03^350 
034352 
034354 
034356 



000004 
005037 
052737 
013737 
012737 
005237 
007000 
013737 
005037 
005037 
022726 
001403 
022626 
104041 
000401 
005726 



■ SBTTL TEST ft 37 - TEST CSM INS 

*TEST 37 TEST CSM INSTRUC 

i THIS TEST CHECKS OUT JHE 

* INSTRUCTION TO MAKE SURE 

* IN USER MODE. 

' ••ik*ilr4r*itr**ilr*i\nilr**Ar*»*'<*«*t***4n(r 

tST37: SCOPE 



1/2516 








CLR 


MMR3 


140000 


177 


76 




BIS 


#140000, PSW 


000010 


001 ; 


04 




MOV 


RESVEC-$TMP 


034324 


ocono 




MOV 


#1$,RESVEC 


177572 








INC 
CSMO 


MMRO 


001204 


000O10 


1$: 


MOV 


$TMP3,RESVE 


177572 








CLR 


MMRO 


177776 








CLR 


PSW 


034324 








CMP 
SEQ 

CMP 

ERROR 

BR 


#1$,(SP)+ 

2$ 

(SP)+, (SP)+ 

■f41 

TST40 








2$: 


TST 


(SP) + 



TRUCTION - ILLEGAL USER MODE 

TION - ILLEGAL USER MODE 

CSM (CALL SUPERVISOR MOPE) 
CSM IS ILLEGAL WHEN DISABLED 

MAKE SURE MMR3 IS CLEARED, DISABLING CSM 

GO TO USER MODE 

SAVE TRAPS TO 10 VECTOR 

TRAPS TO 10 GO TO 1$ 

TURN ON MEMORY MANAGEMENT 

CSM RO 

RESTORE TRAPS TO 10 VECTOR 

rURN OFF MEMORY MANAGEMENT 

RETURN TO KERNEL MODE 

SEE If IT WAS AN EXPECTED TRAP 

BRANCH AROUND ERROR CALL IF IT WAS 

CORRECT STACK 

ILLEGAL CSM DID NOT TRAP TO 10 

;8RANCH AROUND STACK CORRECTION 

CORRECT STACK 



CKKT8D0 11/^4 MEM MGMT PRT B MACRO H^^^5 12-JAN-82 1^:19 PAGE 
TEST # AO - TEST CSM INSTRUCTION - ILLEGAL KERNEL MODE 



G 11 
103 



SEQUENCE 136 



A369 



,S6TTL TEST # 40 - TEST CSM INiTRUCTJON - ILLEGAL KFRNEl MODE 

• #*^*^^t**********A-^**t*tt*t^t*ti^i^i^i(***tfri^ A** *«**);ir ************* 

*TEST AO TEST CSM INSTRUC 

* TH'S TEST CHECKS OUT THE 

* INSTRUCTION TO MAKE SURE 

* IN KERNEL MODE. 



TJON - ILLEGAL KERNEL MODE 

CSM (CALL SUPERVISOR MODE) 
CSM IS ILLEGAL WHEN ENABLED 











' •ttH1tKKtl1ti(t1(1t1ltK1l1l1tftKH1l1[1t1t1t1tH1tk 










• •*******«- *ik«^)k)l(*i^**ik***«*A*4** 


034360 


000004 






tST40: 


SCOPE 




4370 034362 


052737 


000010 


172516 




BIS 


#BI T5, MMR3 


4371 034370 


005057 


177776 






CLR 


PSW 


4372 034374 


013737 


000010 


00120A 




MOV 


RESVEC,*TMP3 


4375 03440H 


012737 


034416 


000010 




MOV 


^1$,RESVEC 


4374 034410 


005237 


^7572 






INC 


MMRO 


4375 034414 


007000 








CSMO 




4376 034416 


013737 


001204 


000010 


1$: 


MOV 


$TMP3.RESVEC 


4377 054424 


005037 


177572 






CLR 


MMRO 


4378 034^30 


022726 


034416 






CMP 


-4'1$,(SP) + 


45/9 034454 


001403 








nco 


2S 


4^80 03A'436 


022626 








{'^p 


(SP)+.(SP)+ 


4381 034440 


104041 








\ VfiOH 


+ A1 


4382 034442 


00040) 








y;; 


TSUI 


4385 054444 


005726 






2$: 


r.sT 


(&?) + 



TURN ON CSM ENABLE 

MAKE SURE PSW PREVIOUS=CURfUiNT=KERNEL 

SAVE TRAPS TO 10 VECTOR 

TRAPS TO 10 GO TO 1$ 

TURN ON MEMORY MANAGEMENT 

CSM RO 

RESTORE TRAPS TO 10 VEUOR 

TURN Off MEMORY MANAGfcMENf 

SEE 1^ IT W.,S AN EXPECTED TRAf 

BRANCH AROUND ^RROR CALL If IT WAS 

CORRECT STACK 

ILLEGAL CSM DID NOT TRAP TO 10 

;eRANCH AROUND STACK CORRECTION 

CORRECT STACK 



CKKiHDO 11 /4A libM PKiMT PRT B MACRO M1113 l^-JAN-8^ 1^:19 PAGE 
TEST # Al - TEST CSM INSTRUCTION - i-SPACE SUPERVISOR MODE 



H 11 
104 



SEQUENCE 157 



A592 



.oBTTL TEST # 41 - TEST CSM INSTRUCTION - I-SPACE SUPERVISOR MODl 

*TEST 41 TEST CSM INSTRUCTION - I-SPACE SUPERVISOR MODE 

* THIS Jf.Sr CHECKS OUT THE CSM (CALL SUPERVISOR ,nODE) 

* INSTRUCTION TO MAKE SURE CSM IS LEGAL WHEN ENABLED 

* FN .SUPFfiVISOR MODE. AND FOR A CHECK OF THE PARAMETERS 

* PUSHED ON THE STACK. 



034446 


000004 






459:5 034450 


012700 


052525 




4394 034454 


004737 


002060 




4395 034460 


012737 


000600 


172260 


4396 034466 


012737 


000032 


172516 


4397 034474 


012737 


040000 


035320 


4398 034502 


012706 


000700 




43"9 034506 


004737 


034530 




4400 034512 


000000 






4401 034514 


005037 


1777/6 




4402 03^520 


005037 


172260 




4403 034524 


000137 


035344 





TST41 



SCOPE 

MOV #52525, RO 

JSR PC.APRINIT 

MOV 1^*600, SDPARO 

MOV #32,MMR3 

MOV #40000, PCSMPS 

MOV #SUPSTK,SSP 

JSR PCCSMSUB 

.WORD 

CLR PSW 

CLR SDPARO 

JMP TST42 



SET UP RO 

RESET ALL MEMORV MANAGEMENT REGISTERS 
Ih W^ GO TO D-SPACE, FLAG AS AN ERROR 
ENABLE CSM, 22-8IT, SUPERVISOR SPACE 
SET PRECSM PS IH LOCATION 
SET\JP SUPERVISOR STACK POINTER 
TEST CSM INSTRUCTION SUBROUTINE 
ADDED TO ADDRESS OF TPAP VECTOR 
RETURN TO KERNEL MODE 
RESET SDPARO TO FIRST 4K 
JUMP OVER THE CSM SUBROUTINE 



CKKT800 11 /A4 
SUBROUTINE TO 



MEM MGMT PRT B 
CHECK OPERATION 



MACRO hi 11.3 12-JAN-82 12:19 
OF AN EXECUTABLE CSM INST'N 



PAGE 



J 11 
105 



SEQUENCE 138 



AAOA 








.SBTTL 


AA05 034530 


012605 






CSMSUB: MOV 


AA06 03A532 


012737 


n0340 


-^7777^ 


MOV 


AA07 03A5A0 


010037 


035324 




MOV 


^-^08 0345-;-; 


012504 






MOV 


A409 03A546 


010537 


035542 




MOV 


A410 034552 


012737 


034704 


035316 


MOV 


A411 034560 


012764 


034622 


000010 


MOV 


441? 034566 


012737 


034614 


001110 


MOV 


4413 034574 


053737 


055320 


y7777t 


BIS 


4414 034602 


010637 


0' ^"2 




MOV 


4415 034606 


162737 


000006 


035322 


sue 


4416 034614 


005237 


177572 




1$: INC 


4417 034620 


007000 






CSMU 


4418 034622 


012737 


000012 


000010 


2$: MOV 


4419 034630 


022716 


034622 




CMP 


4420 034634 


001011 






BNE 


4421 034o36 


012737 


000340 


V777t 


3$: MOV 


4422 034644 


005037 


177572 




CLR 


4423 034650 


022626 






CMP 


4^*24 034652 


104051 






ERROR 


4425 034654 


000177 


000462 




J MP 


4426 034660 


010637 


035336 




4$: MOV 


4427 034664 


012637 


035526 




MOV 


4428 054670 


012637 


055550 




MOV 


A429 034674 


012637 


055552 




MOV 


4430 034700 


000177 


000412 




JMP 


4431 034704 


013705 


055520 




5$: MOV 


4432 034710 


042703 


037777 




BJC 


4433 034714 


000241 






CLC 


4434 034716 


006003 






ROR 


4435 034720 


006003 






ROR 


4436 034722 


052703 


040000 




BJS 


4437 034726 


013737 


177776 


035334 


l^f^V 


4438 034734 


042737 


007777 


035334 


i^-, 


4439 034742 


020337 


035334 




UK? 


4440 034746 


001403 






BfU 


A441 034750 


005037 


177572 




CLR 


4442 034754 


104042 






ERROR 


i,UU^ 034756 


052/'57 


000001 


i;'75/2 


6$: BIS 


4A4'i 034764 


013737 


177776 


035334 


MOV 


4445 034772 


042737 


037777 


035334 


BIC 


4446 035000 


023737 


035540 


035534 


CMP 


4447 035006 


001414 






BFQ 


4448 035010 


012737 


034756 


035316 


MOV 


4449 035016 


005037 


17757? 




CLR 


4450 035022 


013703 


035554 




MOV 


4451 035026 


052703 


040000 




BIS 


4452 035032 


042703 


100000 




BIC 


4453 035036 


104042 






ERROR 


4454 035040 


052737 


000001 


177572 


8$: BIS 


4455 035046 


015704 


177776 




MOV 


4456 035052 


042704 


147777 




BIC 


4457 035056 


006304 






ASl 


4458 035060 


006304 






ASL 


^459 035062 


015702 


035320 




MOV 


4460 U35066 


042702 


0'S7777 




BIC 



TO 



SUBROUTINE 

(SP)+,R5 

#340, PSU 

RO.PCSMRO 

(R5)+,R4 

R5, RETURN 

*5$,D0WELP 

*2$,RESVEC(R4) 

#1$,$LPERR 

PCSMPS,PSW 

SP.PCSMSP 

*6,PCSMSP 

MMRO 



CHECK OPERATION OF AN EXECUTABLE CSM lUSJ'H 
PUT RETURN ADDRESS INTO R5 
KERNEL HODE 
STORE PRlZSn RO 
MOVE OFFSET TO R4 

SET RETURN LOCATION ADDRESS JO LOCATION 'RETURN* 
MOVE ADDRESS FOR INITIAL TESTING TO DOWELP 
SETUP TRAPS TO 10 VECTOR TO 2% 
SETUP LOOP ON ERROR TO U 
PUT USER/SUPERVISOR IN THE PSW 
MOVE STACK POINTER VALUE TO PCSMSP 
SUBTRACT 6 FROM PCSMSP - EXPECT 3 PUSHES ON STACK 
TURN ON MEMORY MANAGEMENT 



/l'RESVEC^-2,RESVEC 

H2%ASP) 

4$ 

#540, PSW 

MMRO 

(SP)f,(SP)+ 

+51 

aRETURN 

SSP^ACSMSP 

(SP)+,CSM1ST 

(SP)+,CSM2ND 

(SP)+. CSH5RD 

aDOWELP 

PCSMPS.R3 

#37777, R3 

R3 

R3 

#6IT14,R3 

PSU.ACSMPS 

#^777, ACSMPS 

R3.ACSMPS 

61 

MMRO 

+42 

#81 TOO, MMRO 

PSW-ACSMPr 

#37777, ACi>MPS 

SUPERM.AISMPS 

8S 

#6$-D0UELP 

MMRO 

ACSMPS,R3 

#8IT14,R3 

#6IT15,R3 

+42 

#BI TOO, MMRO 

PSW,R4 

#14^777, R4 

R4 

R4 

PCSMPS,R2 

#37777, R2 



RESTORE TRAPS TO 10 VECTOR 

SEE U CSM ABORTED 

BRANCH IF IT DIDN'T TO EXECUTE TEST 

GO BACK TO KERNEL PRIORITY 7 

TURN OFF MEMORY MANA6EME.MT 

CORRECT STACK 

CSM ABORTED WHEN IT SHOULD NOT HAVE 

JUMP TO ADDRESS PRESTORED IN LOCATION RETURN 

SAVE AFTER CSM STACK POINTER 

POP 1ST WORD OFF STACK 

POP 2ND WORD OFF STACK 

POP 3RD WORD OFF STACK 

aUMP TO LOCATION IN DOWELP 

PUT PRE-CSM PSW IH R3 

WIPE OUT ALL EITS EXCEPT <15:14>, 

CLEAR THE CARRY BIT 

MOVE <15:14> OVER TO 

THE RIGHT TO <15:12>, 

AND SET <'14>, PUTTING CURRENT=SUPERVISOR IN EXPECTED LOC 

MOVE CURRENT PSW TO ACSMPS 

WIPE OUT ALL BITS BUT <15:12> 

SEE IF PSW STATUS BITS MATCHES CALCULATED VALUE 

BRANCH AROUND ERROR CALL IF OK 

TURN OFF MEMORY MANAGEMENT 

NOT SUPERVISOR MODE 

MAKE SURE MEMORY MANAGEMENT IS ON 

MOVE CURRENT PSU TO ACSMPS 

CLEAR ALL BITS EXCEPT <15:14> 

SEE IF SUPERVISOR MODE 

BRANCH AROUND ERROR CALL IF OK 

SET ADDRESS FOR THIS CHECK TO DOWELP 

TURN OFF MEMORY MANAGEMENT 

MOVE RECEIVED CONTENTS TO R3 

SET BIT 14 AND 

CLEAR BIT 15 

NOT SUPERVISOR MODE 

MAKE SURE MEMORY MANAGEMENT IS ON 

MOVE CURRENT PSW TO R4 

CLEAR AU BITS EXCEPT <13:12> 

MOVE <15:12> BITS IN R4 

TO THE <15:14> POSITION 

MOVE PRECSM PSW TO R2 

CLEAR BITS 15 TO 



CKKTBDO 11M^ 
SUBROUTINE TO 



MEM M6MT PRT B 
CHECK OPERATION 



MACRO Mil 13 12-JAN-82 12:19 PAGE 
OF AN EXECUTABLE CSM INST'N 



J 11 
105-1 



SEQUENCE 139 



AA61 
AA62 

4A6; 

A^65 

AA66 

A467 

AA68 

AA69 

AA70 

AA71 

AA72 

AA73 

A'*7A 

AA75 

A A 76 

AA77 

AA78 

A^79 

AA80 

AA81 

AA82 

AA83 

A^8A 

A'^SS 

A^86 

AAS? 

AA88 

AA89 

A490 

AA91 

AA9? 

AA93 

A/*9A 

AA95 

AA96 

AA97 

AA98 

AA99 

A 500 

A501 

A502 

A503 

A50A 

A505 

A506 

A507 

s'508 



035072 
03507A 
055076 
03510A 
035110 
035112 
035120 
035126 
035130 
035136 
035U2 
0351AA 
C35152 
035156 
035160 
035166 
035172 
03517A 
035202 
035210 
035212 
035220 
Oj522A 
035232 
03523A 
0352A2 
035250 
035252 
035260 
03526A 
035266 
03527A 
035276 
03530A 
035306 
035312 

035316 
035320 
035322 
03532A 
035326 
035330 
035332 
03533A 
035336 
0353A0 
0353A2 



02020A 
00U06 
012737 
005037 
10A043 
052737 
0237?7 
00U06 
012737 
005037 
lO^Oi^A 
052737 
020037 
00U06 
012737 
005037 
10A0A5 
052/'57 
022737 
00U11 
012737 
005037 
012737 
10A046 
052737 
032737 
OOU06 
012737 
005037 
10A0A7 
022737 
00U06 
032777 
OOU02 
000137 
000177 

000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
OAOOOO 
000000 



035OA0 
177572 

000001 
035336 

0:i5112 
177572 

000001 
035326 

035 U A 
177572 

000001 
03A622 

0351 A 

03A622 

000001 
000017 

03523^; 
177572 

03A704 

001000 

03A6U 
00002*^ 



CMP c<2M 

BEO lOi 

035316 MOV #8$,D0WELP 

CLfi MMRO 

ERROR +43 

177572 10$: BIS /S'BI TOO, MMRO 

035322 CMP ACSMSP.PCSMSP 

BEQ 12$ 

035316 MOV *10$,D0WELP 

CLP MMRO 

ERROR +44 

177572 12$: BIS #9iT00,MMR0 

CMP R0,CSM1ST 

BEQ 14$ 

035316 MOV *12$,D0WELP 

CI.R MMRO 

ERROR +45 

177572 14$: BIS JVSITOO^MMRO 

0353^0 CMP #2$,CSM2ND 

BEQ 16$ 

055:^16 MOV *14$,D0WELP 

CLR MMRO 

001176 MOV #2$.$TMP0 

ERROR +46 

M757? 16$: BIS .fl'BITOO.MMRO 

035332 BIT J«^17.CSM3RD 

BEQ 18$ 

035316 MOV *16$,D0WELP 

CLR MMRO 

ERROR +47 

035316 18$: CMP ^5S,D0UELP 

BEQ 19S 

1A3634 BIT #8]T09,3SWR 

eEQ 19$ 

JMP 1$ 

19$: JMP aRETURN 

OOWELP.- .WORD 

PCSMPS: .WORD 

PCSMSP; .WORD 

PCSMRO: .WORD 

CSM1ST: .WORD 

CSM2ND: .WORD 

CSM3RD: -WORD 

ACSMPS: .WORD 

ACSMSP; .WORD 

SUPERM: .WORD 40000 

RETURN: .WORD 



SEE U PREVIOUS MODE IS OK 

BRANCH AROUND IRROR CALL U OK 

SET ADDRESS FOR THIS CHECK TO DOWELP 

TURN OFF MEMORY MANAGEMENT 

WRONG PREVIOUS MODE 

MAKE SURE MEMORY MANAGEMENT IS ON 

SEE U STACK POINTER VALUE WAS TRANSFERED 

BRANCH AROUND ERROR CALL U SO 

SET ADDRESS FOR THIS CHECK TO DOWELP 

TURN OFF MEMORY MANAGEMENT 

INCORRECT STACK 

MAKE SURE MEMORY MANAGEMENT IS ON 

COMPARE RO WITH THE ARGUMENT THAT WAS ON STACK 

U EQUAL, BRANCH AROUND ERROR 

SET ADDRESS FOR THIS CHECK TO DOWELP 

TURN OFF MEMORY MANAGEMENT 

INCORR'^CT ARGUMENT 

MAKE SURE MEMORY MANAGEMENT IS ON 

SEE IF UPDATED PC WAS CORRECT 

BRANCH AROUND ERROR IF OK 

SET ADDRESS FOR THIS CHECK TO DOWELP 

TUR' OFF MEMORY MANAGEMENT 

MOVE EXPECTED UPDATED PC TO $TMPO 

WRONG PC 

MAKE SURE MEMORY MANAGEMENT IS ON 

SEE U PSW <3;0> WERE CLEARED 

BR.\NCH AROUND ERROR CALL IF OK 

SET ADDRESS FOR THIS CHECK TO DOWELP 

TURN OFF MEMORY MANAGEMENT 

'BITS <3:0> SET IN PSW 

'^EE IF ANY ERRORS THIS TIME AROUND 

BSANCH TO NORMAL RETURN JUMP U NOT 

SEE IF LOOP ON ERROR IS SET 

BRANCH IP SO 

JUMP BACK FOR LOOP ON ERROR 

JUMP BACK TO RETURN ADDRESS iH LOCATION RETURN 

LOCATION HOLDING ADDRESo 10 SHORTEN POSSIBLE ERROR LOOP 

LOCATION TO STORE PRE-CSM PSW 

LOCATION TO STORE PRE-CS1 STACK POINTER 

LOCATION TO STORE PRE-CSM RO VALUE 

LOCATION TO STORE 1ST WORD POPPED AFTER CSM EXECUTION 

LOCATION 10 STORE 2ND WORD POf^ED A» TER CSM EXECUTION 

LOCATION TO STORE 3RD WORD POPPED AFTER CSM EXECUTION 

LOCATION TO STORE POST-CSM PSW 

:.OCATION TO STORE POST-CSM STACK POINTER 

LOCATION TO STORE VAt UE OF PRESENT MODE=SUPERViSOR 

LOCATION TO STORE RETURN ADDRESS OF THE CSMSU8 
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SEQUENCE 140 



4517 



S8TTL TEST # 42 - TEST CSM INSTRUCTION - D-SPACE SUPERVISOR MODE 
*TEST 42 TEST CSM INSTRUCTION - D-SPACE SUPERVISOR MODE 

; ^*****H** ****** *********^r ******* v****y-i*****)r ******************* 

* THIS TEST CHECKS OUT THE CSM (CALL SU."E'?v;.:U;f-: Hi-^'^ • 

* INSTRUCTION TO MAKE SURE CSM IS LEGAL WHEN ENABLED 

* IN SUPERVISOR MODE. AND FOR A CHECK OF THE PARAMETERS 

* PUSHED ON THE STACK. 

;**********************************♦■****»**•*»************♦***** 
********************************** ***************i»-*ffHr***** ****** 



0^5344 


000004 




TST42: 


SCOPE 


4518 035346 


012737 


000032 


1725^6 


MOV 


4519 035354 


CI 2737 


040000 


035320 


MOV 


A520 03536? 


052737 


040000 


177776 


BIS 


4521 035370 


012737 


000600 


172240 


MOV 


4522 035376 


013706 


000700 




MOV 


4523 035402 


004737 


034530 




JSR 


4524 035406 


060000 






.WORD 


4525 035410 


005037 


177776 




CLR 


4526 035414 


005037 


172240 




CLR 



#32,MMR3 

#40000, PCSMPS 

#eiT14,PSW 

#600,SIPAR0 

*SUPSTK,SSP 

PC.CSMSUB 

60000 

PSW 

SIPARO 



ENABLE 22'BIT, CSM, SUPERVISOR 

LOAD PRECSM LOCATION 

60 TO SUPERVISOR MOPE 

IF WE GO TO I -SPACE, FLAG IT AS AN ERROR 

SETUP S\}PER)/lSOR STACK POINTER 

TEST CSM INSTRUCTION SUt^ROUTiNE 

60000 ADDED TO ADDRESS OF TRAP VECTOR 
RETURN TO KERNEL MODE 
RESET SIPARO TO FIRST 4K 



I 4 4 
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SEQUENCE 141 



4535 



AS56 
4S'-7 

4558 
4539 
4540 
4541 
4542 
4543 
4544 



035420 
035422 
03S430 
035436 
035444 
035452 
035456 
035462 
035464 
035470 



000004 
012737 
012737 
052737 
012757 
012706 
004737 
000000 
005037 
005037 



000031 
140000 
140000 
000600 
000600 
034530 

177776 
177660 



172516 
035320 
177776 
1 77660 



.SBTTL TEST # 
nEST 43 

* THIS lE 

* INSTRUC 
^ h^ USER 

* PUSHED 

TST43: SCOPE 
MOV 
MOV 
BIS 
MOV 
MOV 

I rn 

.WORD 

CLP 

CLR 



43 - T 

TEST 
****** 

ST CHE 

TION T 

MODE, 

ON THE 
****** 

****** 



EST CSiM INS 
*********** 

csr-i iNSTRur 
*********** 

C<S OUT THE 

MAKE SURE 

A;^jD rOR A 

STACK. 

**^******** 

*********** 



#31,W1R3 

-fi* 140000, PCSMPS 

*^1hOOOO.PSW 

^600.,UDPAR0 

.^USESTK,SSP 

PC.CSMSU8 



PS'J 

UDPARO 



TRUCTION " I-SPACe USEH MODE 

*** J ***************************** 

TION - I-SPACE USER MODE 

*********** '4 ************* -.V ******* 

CSM (CALL SUPERVISOR MODE) 

CSM IS LEGAL WHEN ENABLED 
CHECK OF THE PARAMETERS 

*************A*A*****A** ********* 
**************** iV ******** ******** 

E\'ABLE 22-BlT, CSM USER 

LOAD PRECSM LOCATION 

GO ro USER MODE 

If WE GO TO D-SPACE. FLAG AS AN ERROR 

SETUP USER STAC< POINTER 

TEST CSM INSTRUCTION SUBROUTINE 

ADDED TO ADDRESS OF TRAP VECTOR 
RETURN TO KERNEL MODE 
RESET UDPARO TO FIRST 4K 
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SEQUENCE 142 



A553 



03547A 


00000'.- 




TST44: 


SCOPE 


455A 035A76 


012/37 


000031 


172516 


MOV 


A555 035504 


012737 


140000 


035320 


MOV 


4556 035512 


012737 


000600 


177640 


MOV 


4557 035520 


012706 


000600 




MOV 


4558 035524 


004737 


034530 




.iSR 


4559 035530 


000000 






.WORD 


4560 03553? 


005037 


177776 




CLR 


4561 C35536 


005037 


177640 




CLR 



S8TTL TEST jV 44 - TEST CSM INSTRUCTION - D-SPACE USER MODE 
*TEST 4^ TEST CSM INSTRUCTION - \)-S?.\Z^ USER MODE 

; ******************************************* *************,^**.fr*it* 

* THIS TEST CHECKS OUT THE CSM (CALL SUPERVISOR MODE) 

* INSTRUCTION TO MAKE SURE CSM IS LEGAL W.MEN ENABLED 

* IN USER MODE- AND FOR A CHECK OF THE PARAMETERS 

* PUSHED ON THE STACK. 

;****** **********************************H)^A******************** 
;w»i*i»***w****************************************** •■,•**** ******** 



#31>r^^R3 

#U0000.PCSMPS 

#600,UIPARO 

^USESTK.SSP 

PCCSMSUB 



PSW 

UJPARO 



ENABLE 22-01 T, CSM USER 
LOAD PRECSM lOCATION 
U WE GO TO I-SPACE, FLAG AS AN ERROR 
SETUP USER STACK POINTER 
TEST CSM INSTRUCTION SLteRQUTINE 
ADDED TO ADDRESS OF TRAP VECTOR 
RETURN TO KERNEL MODt 
RESET UiPARO TO FlRoT '.;<. 
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SEQUENCE H3 



A567 



4S68 
4569 
4570 
4571 
4572 
4573 
4574 
4575 
4576 
4577 
4578 
4579 
4580 
^581 
4582 
4583 
4584 
4585 
4586 
4587 
4588 
4589 
4590 
4591 
4592 
4593 
4594 
4595 
4596 
4597 
4598 
4599 
4600 
4601 
4602 
4603 
4604 
4605 
4606 
4607 
4608 



035542 
035544 
035552 
035560 
035564 
035570 
035574 
035600 
035606 
035612 
035616 
035622 
035626 
035630 
035632 
035636 
035642 
035644 
035650 
035654 
035656 
035662 
035666 
035672 
035676 
035700 
035704 
135710 
035714 
035716 
035720 
035724 
035726 
035732 
055736 
035742 
035744 
035762 
035764 
035766 
035770 
036006 



00000*; 

012737 
012737 
012701 
0127U2 
01,:703 
012704 
012737 
011237 
012700 
000000 
011637 
021300 
001407 
062706 
011337 
104052 
162706 
021457 
001417 
012637 
012637 
012637 
01143/* 
104053 
013A6 
013746 
013746 
022223 
005724 
062706 
077150 
005037 
005037 
005037 
000430 
007010 
035766 
035762 
052525 
035764 
035762 



040000 

000032 

000007 

035744 

035770 

036006 

035622 

035616 

0357: 

000000 

001200 



000006 
001176 

000006 
001200 

001204 
001206 
001210 
001202 

001210 
001206 
001204 



000006 

177572 
172516 
177776 



177776 
172516 



000010 



SBTTL 

*TEST 

* 

TST45: 



TEST # 45 - TEST CS.M INSTRUCTION - MODE TESTS 

45 TEST CSM INSTRUCTION - MODE TESTS 
THIS J^ST EXECUTES THE CSM INSTRUCTION LEGALLY IN MODES 1 
CHECKING FOR PROPER REGISTER INCREMENT/OECRFMENT AND THAT 

CONTENTS IS PROPERLY ON THE STACK 
****************************** *ik-* *■*****♦*****♦**♦* ********** 

SCOPE 



THROUGH 7, 
ARGUMENT 



1$: 

2S: 
3$: 



4$: 



5$: 



007020 007030 



C35766 
035762 



035766 
035766 



fSMINS 

RE6LA8 

REGCHG 
REGDAT 



MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

.WORD 

MOV 

CMP 

BEO 

ADD 

MOV 

ERROR 

SUB 

CMP 

BEQ 

MOV 

MOV 

MOV 

MOV 

ERROR 

MOV 

MOV 

NOV 

CMP 

I ST 

ADD 

SOB 

CLR 

CLR 

CLR 

BR 

.WORD 

.WORD 

.WORD 

.WORD 

.WORD 

.WORD 



^40000, PSW 

^32,MMR3 

#7,R1 

#CSMrr'^- ^'^ 

#REGC\ 

#REGlMi.,-iA 

^3$,Rt:SVEC 

CR2),2$ 

0,0 

CSP),$TMP1 

(H3),R0 

4S 

ff(),SP 

(R:^),fTMPO 

/'6,SP 

(R4),$TMP1 

5$ 

(SP)+,$TMP3 

(SP)+,$TMP< 

(5P)+,$TMP5 

(R4),r-TMP2 

*53 

$TMP5,-(SP) 

$TMP4,-(SP) 

$TMP3,-(SP) 

(R2)+,(R3)+ 

(R4) + 

*6,SP 

R1J$ 

MMRO 

HMR3 

PSW 

$EOP 



60 TO SUP£RVISOf< MODE 

ENABLE 22-81 T, CSM, SUPERVISOR 

DO 7 MODES 

LOAD ZZy^. INSTRUCTION POINTER INTO ft2 

LO^D REGISTER CHANGE TABLE POINTER TO R3 

LOAD ARGUMENT EXPECTED STACK POINTER TO R4 

SET RETURNS TO 3$ 

MOVE CSM INSTRUCTION TO TEST LOCATION 

RESET RO 

ISl WORD FOR CSM INSTRUCTION, 2ND FOR MODES 6 & 7 

MOVf: ARGUMENT WORD TO $TMP1 

SEE IF REGISTER CHANGED PROPERLY 

BRANCH :^ OK 

POP STACK tOR 

MOVE EXPECTED 

CSM FAILED TO 

RESTORE STACK 

SEE LF CORRECT 

BRANCH IF OK 

POP STACK FOR POSSIBLE ERROR LOOPING 



POSSIBLE ERROR LOOPING 
DATA TO STMPO 

INCREMENT/DECREMENT REGISTER PROPERLY 
POINTER TO PRE-ERROR STATE 
ARGUMENT WAS LOADED 



MOVE EXPECTED 
CSM FAILED TO 
RESTORE STACK 



DATA TO $TMP2 

PUT PROPER ARGUMENT ON STACK 

- NO ERROR LOOPING 



INCREMENT RZ AND R3 TO NEXT LOCATIONS 

INCREMENT R4 TO NEXT LOCATION 

POP STACK OF CSM PUSHES 

SUBTRACT 1 AND BRANCH IF NOT ALL MODES CHECKED 

TURN OFF MEMORY MANAGEMENT 

CLEAR MMft3 

RETURN MODE BACK TO KERNEL 

SKIP OVER TABLES AWD LOCATIONS 
CSM1.CSM2,CSM3,CSM4,CSM5,CSM6,CSM7 
RE6LAB+? 
REGLAa-2 
52525 

REGLA6,RE6LAH^,RE6LA8+2,REGLAB-2.RtGL.d-2,RfciGLAB.REGLAB 
REGLAB-2,RE'; 'AB-2,REGLAB+2,REGLAB+2, 52525, REGLA8-d,RE6LAB+2 
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SEQUENCE 144 



r 



0360^4 
05602A 
0?60?6 
056032 
036036 
O360AA 
0360A6 
036050 
036052 
05605A 
036056 
036060 
036066 
0^6070 
036074 
036076 
036076 
03610? 

0361^2 

036122 

036126 

0^6134 
036136 
036142 

036206 
036206 

056212 
036214 
036220 
036224 
0362^0 
036232 
036234 
036240 

036242 
036242 
036246 
036250 
0^:6252 
036254 
03625G 



000004 
005037 
005237 
042737 
005327 
000001 
003104 
012737 
000001 
036046 
032737 
001403 
005737 
001453 

104401 
000407 



104405 
005 737 
00143^ 
104401 
000421 



104405 
10^401 
005037 
013700 
001414 
005046 
012746 
000426 



01^700 
00U05 
000005 
004710 
000240 
000240 



.SBTTL END Of PASS ROUTINE 

^INCREMENT THE PASS NUMBER ($PASS) 

MYPE "END PASS tfXXXXX TOTAL NUMBER OF ERRORS SINCE LASV REPORT YYYYY" 

*UHERF XXXXX AND YYYYY ARE DECIMAL NUMBERS 

MF SW12=1 INHIBIT TRACE TRAP 

MF THERES A MONITOR GO TO I T 

MF THERE ISN'T JUMP TO LOOP 



$EOP: 



001102 
001232 
100000 



001232 



$EOPCT: 



SCNDCT: 



000077 
001112 

036104 



001232 



013746 001232 



10005: 



;;65$: 
64$: 



001 in' 

036144 



013746 001112 



;;67$: 
66$: 



001221 
001112 
000042 



036242 

000042 



$GfcT42: 



SCLR.T: 



$ENDAD: 



SCOPE 

CLR 

INC 

BIC 

DEC 

.WORD 

Bcr 

MOV 

.WORD 

itOPCT 

BIT 

BEQ 

TST 

BEQ 

TYPl- 

BR 

.ASCIZ 

MOV 

TYPDS 

TST 

BtO 

TYPE 

BR 

.ASCIZ 

MOV 

TYPDS 

TYPE 

CLR 

MOV 

BEQ 

CIR 

MOV 

BR 



MOV 
BEQ 
RESET 

JSR 
NOP 
NOP 



STSTNM 

$PASS 

#100000. $PASS 

(PC) + 

1 

$D0AGN 

(PC)+,3(PC)+ 

1 

#77,$PASS 
1000$ 
$ERTTL 
$6ET42 

,65$ 

64$ 

<12><15>/END 



;;ZERO THE TEST NUMBER 
;;INCf^fc'MENT THE PASS NUMBER 
;,DONT ALLOW A NEG. NUMBER 
;;100P? 

• • y^s 

;;RESTORE COUNTER 



;»ARE WE TO PRINT THIS PASS? 
;»8R AN CH IF WE ARE 
;»TEST $ERTTL FOR ANY ERRORS THIS 
;»8RANCH IF NO ERRORS THIS PASS 

;;TYPE ASCIZ STRING 
;;GET OVER THE ASCIZ 
PASS #/ 



PASS 



DPM002 
DPM002 
DPM002 
DPM002 



$PASS,-(SP) 



;;SAVE $PASS FOR TYMEOUT 

;;TYPE PASS NUMBER 

;;G0 TyPE-'DECIMAL ASCII WITH SIGN 
$ERTTL •»; Y ERRORS THIS PASS? 

*iitl42 ,''>8KAf4C;i OVER 'TOTAL' REPORT ii' NONE 

,67$ ;;TYPE ASCIZ STRING 

6o$ ;;GET OVER THE ASCIZ 

/ TOTAL ERRORS SINCE LAST REPORT / 



;DPM002 
:DPM002 



$ERTTL,-(SP) 



,$CRLF 

$ERTT1 

d#42,R0 

$DOAGN 

'(SP) 

*$CLR.T.-tSP) 

$RTRN 



S4r42,R0 
$DOAGN 

PC.(RO) 



SAVE $ERTTL FOR TYPEOUT 

TOTAL NUMBER OF ERRORS 

GO TYPE—DECIMAL ASCII WITH SIGN 

TYPE CARRIAGE RETURN, LINE FEED 

CLEAR ERROR TOTAL 

GET MONITOR ADDRESS 

BRANCH IF NO MONITOR 

INSURE THE "T" BIT IS CLEAR 

SETUP ^0R AN RTI OR RII 

GO 00 AN RTI OR RTF 10 LOAD THE PoW 

WITH A CLEARED "T" BIT 

INSURE RO CONTAINS THE MONITORS 

RETURN ADDRESS 

CLEAr^ THE WORLD 

GO TO MONITOR 

SAVE ROOM 

FOR 
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SEQUENCE 145 



036260 


000240 




036262 






036262 


104400 




036264 


042716 


000020 


036270 


032777 


010000 


0362/6 


001005 




036300 


005137 


001310 


036304 


100402 




036306 


052716 


000020 


036312 


012746 


036320 


036316 


000002 




036320 






036320 


000 n? 




0363^2 


020560 




036324 


377 


377 



SDOAGN: 



142642 



1$: 
$RTRN: 



NOP 

TRAP 

BIC 

BIT 

BNE 

COM 

BMI 

BIS 

MOV 

RTi 



000 



4610 



000001 



SLOOP: 

JMP 
SRTNAD: .WORD 
SENULL; .BYTE 

■ END 



#20, (SP) 

#8IT12,SSWR 

1$ 

$T8JT 

1$ 

#20, (SP) 

#$LOOP,"(SP) 



a(pc)+ 

I OOP 
-1,-1,0 



;;ACT11 

;;PUSH OLD PSW AND PC ON STACK 

;;CLEAR THE "T" BIT 

;;RUN WITH TRACE TRAP? 

;;8R If NO 

;;IS 11 TIME FOR TRACE TRAP 

;;8R IF NO 

;;SET TRACE TRAP 

;;JUMP TO START Of TtST 

;;RETURN— THIS IS CHANGED TO 

;;AN "RTT'* IF "RTT" IS A LEGAL 

;; INSTRUCTION 

;; RE TURN 

;;NULL CHARACT^'' STRING 
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SEQUENCE 146 


SYMBOL 


TABLE 




















ABASE = 


000000 


BITOO = 


000001 


DH14 


013242 


DT55 


016010 


KDPAR3=^ 


172366 




ACDU1 = 


000000 


BIT01 = 


000002 


DH15 


013322 


DT57 


016022 


KDPAR4- 


172370 




ACDW? - 


000000 


BIT02 = 


OOOOOA 


DH16 


013362 


EMTVEC= 


000030 


KDPARS^ 


172372 




ACPhOP= 


000000 


BIT03 = 


000010 


DHl 7 


013442 


EMI 


007522 


KDPAfi6= 


172374 




ACShPS 


03533A 


BITOA ~ 


000020 


DH2 


012752 


EMIO 


007631 


KDPAR7= 


172376 




ACShSP 


035336 


B1T05 = 


000040 


DH20 


013522 


EM11 


007701 


KDPDRO= 


172320 




ftUDWO = 


000000 


BIT06 = 


000100 


DH21 


013562 


FM1? 


007750 


KDPDRI^ 


172322 




ADDWI ^ 


000000 


B1T07 - 


000200 


DH22 


013677 


EMI 3 


010022 


KDPDR2= 


172324 




ADDWIO^ 


000000 


BIT08 • 


000400 


DH24 


013737 


EMU 


010073 


KDPDR3= 


172326 




ADDW1 1-= 


000000 


BIT09 - 


001000 


DH26 


013777 


EM15 


010154 


KDPDR4- 


172330 




ADDWI 2^ 


000000 


BJT1 = 


000002 


DH27 


014111 


EM16 


01^^237 


KDPDR5= 


172332 




ADDWI 3^ 


000000 


BITIO ^ 


002000 


DH30 


014306 


EM2 


C07562 


KDPDR6= 


1 72334 




ADDWU.- 


000000 


Bini = 


004000 


DH32 


014362 


EM21 


010315 


KDPDR7=: 


172336 




ADDWI 5- 


000000 


BIT12 = 


010000 


DH33 


014401 


EM22 


010362 


KERSTK= 


001100 




ADDW? ^ 


000000 


BIT13 - 


020000 


DH34 


014441 


EM23 


010431 


KIPARO^ 


172340 




ADDW5 = 


000000 


BJTU = 


040000 


DH36 


014532 


FM24 


010464 


KIPAR1= 


17234? 




ADDWA -: 


000000 


BIT15 = 


100000 


DH37 


014572 


EM25 


010523 


KIPAR?^ 


172344 




aODWS :^ 


000000 


BIT2 ^: 


000004 


DH40 


014632 


EM26 


010570 


KIPAR3=: 


172346 




ADDW^ - 


000000 


BIT3 - 


000010 


DH41 


014703 


EM27 


010636 


KJPAR4- 


172350 




ADDW/-' = 


000000 


VslJ^f =^ 


000020 


DH42 


015007 


EM30 


010713 


KJPAR5= 


17235? 




ADDW8 ■^■ 


000000 


h\T5 ^- 


000040 


DH43 


015047 


EM31 


010756 


K1PAR6= 


1723S4 




ADDW9 ■■ 


000000 


tUT6 ■■: 


000100 


DH44 


015117 


EM3? 


011021 


KJPAR7^ 


172356 




Ant:vrr^-- 


oonono 


'-J , I "^ 


000200 


DH45 


015157 


EM33 


011057 


KIPDRO- 


172300 




AorvM - 


nooOOO 


1 >' = 


000400 


DH55 


015207 


EM3'* 


011135 


KIPDRI^ 


172302 




AhNV - 


000000 


UiT9 ^- 


001000 


DH57 


015246 


EM35 


011216 


KIPDR2= 


172304 




Ae.NVH ^- 


000000 


BPTVEC^^ 


OU0014 


DJSPLA 


001142 


EM36 


011252 


K1PDR3= 


172306 




AFATAL- 


000000 


CKSWR ^ 


104410 


DISPRE 


000174 


EM37 


011327 


KJPDR4= 


172310 




AMADRN-: 


000000 


CMSG 


00S^61 


DOWELP 


035316 


EM40 


01137? 


KIPDR5= 


17231? 




AWAPHf^^- 


000000 


CNfRLC 


005302 


DSWR = 


177570 


EM41 


011457 


KJPDR6- 


172314 




AHADR ^■ 


oooono 


CPSAVE 


003266 


DTI 


015306 


EM42 


011523 


KIPUR7- 


172316 




ARADRA^- 


000000 


CPUtRH- 


^y7r66 


DTIO 


015344 


EM43 


011566 


KSP " 


X00^006 




AMAMSl-^ 


cooooo 


CR 


00001 s 


DT12 


015356 


EM44 


011633 


LF 


00001? 




AHAMS2- 


000000 


CRIF ^ 


000200 


DT13 


015374 


FM45 


011701 


LOOP 


020560 




AWAMS?:^ 


000000 


CSMINS 


035744 


DTK 


015412 


EM46 


011740 


M^PDLD 


005004 




AMAilSA- 


000000 


CSMSU3 


034S30 


DT15 


015430 


FM47 


01200:^ 


MFPDLP 


002770 




AMSOAD^ 


000000 


CSMO -^ 


007000 


DT16 


01544? 


EMSO 


012041 


MFPDPS 


00277? 




AMSGLG^ 


000000 


CSMl - 


0070 lO 


on/ 


015460 


EM51 


012070 


NFPDTS 


00?746 




AMSGTY- 


000000 


CSMIST 


035^,^6 


nT2 


015324 


EM5:^ 


012126 


MFPDVC 


003040 




AMTVPI" 


000000 


CSM2 ^ 


007020 


D120 


015476 


EM53 


01215? 


MFPPVl 


035564 




AMT¥P^= 


000000 


CSM2ND 


035330 


Dr2i 


015510 


EM54 


0122U 


MFPJLD 


002532 




AMTYP3=^ 


OOOGOO 


CSM3 - 


007030 


DT22 


015526 


EM55 


012263 


MFFILP 


002516 




AMrYP4= 


000000 


rSM^RD 


035^3? 


Dr24 


0155^0 


EM56 


01232*' 


MFPIPS 


002520 




APASS ^ 


000000 


CSMA = 


007040 


DT26 


01555? 


EM57 


012413 


MFPITS 


002464 




APRINI 


002060 


CSM5 := 


007050 


DT27 


015570 


FM58 


012466 


MFPIVC 


002622 




APRIOR^ 


000000 


CSM6 ^ 


007060 


DT30 


015606 


ERLOOP 


002624 


M^PJVI 


027566 




APTCSU= 


OOOOAO 


CSM7 r 


007070 


DT32 


015620 


ERPREP 


002444 


Mf PiV2 


030164 




APTENV- 


000001 


DDJSP - 


177570 


DT34 


015626 


ERROR = 


104^00 


M^P1V3 


031674 




APTS1Z= 


000200 


yn 


016034 


DT36 


0156'*? 


tRRlVP 


003650 


MFP1V4 


032 3C 




APTSPO^^ 


000100 


on? 


016057 


DT40 


015654 


ERRVEC= 


000004 


MFP1V5 


03256? 




ASWREG^ 


000000 


0f2 


016041 


0141 


015664 


GTSMR -^ 


10440' 


MFPIV6 


034036 




ATESTN- 


000000 


DF3 


016050 


DT42 


01S700 


HT 


000011 


MGMERR 


01614? 




AUNIT ^- 


000000 


nF^2 


016065 


Dr43 


015712 


IBSAVE 


003646 


MGMFLG 


016144 




AUSWR = 


000000 


DF5 


016054 


0145 


015726 


INJT 


020666 


M«RO = 


177572 




AVECTl--r 


000000 


DHl 


012672 


0146 


015742 


IOTVEC= 


000020 


MMRl ^ 


177S74 




AVFCT2^ 


000000 


OHIO 


013042 


DT47 


015754 


KDPARO^ 


172360 


MMR? - 


}77b76 




BADPC 


001304 


DH12 


013102 


0150 


015766 


KDPAR1= 


17236? 


MMR3 = 


172516 




BITO - 


000001 


DH13 


013162 


1)152 


016000 


KDPAR2= 


172364 


MMVEC - 


000250 
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MTPILD 


002676 


MTPILP 


002654 


MTPIPM 


002656 


MTPITA 


002720 


MTPITS 


002626 


MTPIVC 


002744 


MTPIV1 


030614 


MTPIV2 


031260 


P1TPIV3 


033022 


flTPlVA 


033242 


NDFLAG 


002242 


NODSPA 


002232 


PATCH 


016232 


PBAHI 


001302 


PBALO 


001300 


PCSMPS 


035320 


PCSMRO 


035324 


PCSMSP 


035322 


PFFCDF 


004302 


PFECDH 


004242 


PKfcCDT 


004272 


PFECtM 


004202 


PFECWS 


004 V2 


PIRQ = 


^77772 


PIRQVE= 


000240 


PRO :- 


000000 


PR! = 


000040 


PR2 


000100 


PR3 ^ 


00014G 


PR^ 


000200 


PR5 


000240 


PR6 


000300 


PR7 = 


000340 


PS = 


■\77776 


PSW = 


}77//6 


PWRMSG 


007460 


PWRVEC- 


00002*; 


RDCHR =^ 


104411 


RDLIN = 


104412 


REGCHu 


035770 


REGDAT 


036006 


REGLA8 


055764 


RESREG= 


104414 


RESVEC= 


000010 


RETURN 


035342 


R6 


X000006 


R7 


X000007 


SAVREG= 


104413 


SCOPE = 


000004 


SDPARO^ 


172260 


SDPAR1- 


1/2262 


^DPAR2^ 


172264 


SDPAR3= 


172266 


SOPARA= 


U2270 


S0PAR5= 


)72272 


St>PAR6= 


^7227(, 


SDPAR7= 


xm/b 
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SDPDRO^ 

SDPDR1- 

SDPDR2^ 

SDPDR3: 

SDPDR4: 

SDPDR5: 

SDPDR6^ 

SDPDR7: 

SIPARO^ 

SIPARV 

SJPAR2^ 

SJPAR3= 

SIPAR4: 

SIPARS^ 

SJPAR6= 

SJPAR7: 

SIPDRO; 

SIPDRV 

SIPDR2: 

SIPDR3: 

SIPDR4 

SIPDR5: 

SJPDR6- 

SIPDR7^ 

SRO : 

SR1 

SR2 

SR"? 

SSP 

STACK ■ 

JiFAHl 

STKLMT: 

SUPERM 

SUPSTK^ 

SUR 

SWREG 

SWO 

swoo ■■ 
swoi ■■ 

SW02 ■■ 

SW05 ■■ 

SW04 ■■ 

SW05 : 

SW06 ■ 

SW07 ■■ 

SU08 ■■ 

SW09 ; 
SUl 

swio ■' 

SWll ^ 
SW12 ■ 
SW13 - 
SW14 
SUl 5 ■■ 
SU2 

SWi . 
SU4 



= 172220 

■■ 172222 

: 172224 

: 172226 

: 172230 

•■ 172232 

■■ 17223, 

■■ 1722^6 

■ 172240 
■• 172242 
: 172244 
: 172246 
■■ 172250 
: 172252 
■■ 172254 
: 172256 
' 172200 
: 172202 
: 172204 
■■ 172206 
= 172210 
: 1/2212 

■ ^722^^ 

■- 172216 

■ 177572 
: 177574 
'- }77576 
■■ 172516 
^X000006 
: 001100 

020000 

: 177774 

035340 

■ 000700 
001140 
000176 

■■ 000001 

■■ 000001 

■■ 000002 

■■ 00000^ 

: 000010 

: 000020 

: 000040 

: 000100 

: 000200 

: 000400 

: 001000 

: 000002 

■■ 002000 

: 004000 

: 010000 

: 020000 

^ 040000 

■■ 100000 

: 000004 
000010 

■■ 000020 



SW5 = 

SW6 ^ 

SW7 = 

SW8 = 

SW9 

TBIT = 

TBJTPS 

T8ITVE= 

TESTNO 

TJMERR 

TJMFLG 

TKVEC = 

TOFF 

TON 

TPVEC = 

TRAPPC 

TRAPPS 

TRAPVE^ 

TRTVEC= 

TSl I 

TST10 

tsth 

TST12 

TST13 

TST14 

TST15 

TST16 

TST17 

TST2 

TS[20 

TST21 

-^^122 

^S^25 

TSr24 

TST25 

TST26 

TST27 

TST3 

TST30 

TST31 

TST3cl" 

TST33 

TST34 

TST35 

TST36 

TST37 

TST4 

TST40 

TST41 

TST42 

TST43 

TST44 

TST^5 

TST5 

TST6 

TSr7 

TVPBN = 



000040 
000100 
000200 
000400 
001000 
000020 
001274 
000014 
001254 
016070 
016072 
000060 
002356 
002412 
000064 
001260 
001262 
000034 
000014 
020704 
023160 
023462 
023552 
023742 
024256 
025234 
026272 
026542 
021222 
027016 
027232 
027634 
030232 
030662 
031326 
031742 
032352 
021456 
032636 
033042 
033262 
033332 
03.'632 
034 lOi 
034174 
034266 
021632 
034360 
034446 
035344 
035420 
035474 
035542 
022126 
022406 
022566 
104406 



TVPDS : 
TYPE ■' 
TYPOC : 
TYPON = 
"'POS : 
uDPARO: 
UDPAR1- 
UDPAR2= 
UDPAR3- 
UDPAR4: 
UDPAR5: 
UDPAR6- 
UDPAR7: 
UDPDRO= 
UDPDRl^ 
UDPDR2= 
UDPDR3= 
UDPDR4^ 
UDPDR5= 
UDPi)R6: 
UDPDR7: 
UIPARO^ 
UIPARl: 



UIPAR3^ 

UiPAR4: 

UIPAR5= 

UIPAfi6^ 

UIPAR7: 

UJPDRO- 

MIPDRV 

UJPDR2^ 

UIPDR3= 

UJPDR4 

UIPDR5: 

UIPDR6= 

UIPDR7: 

USESTK: 

USP : 

V1RT1 

WASR6 

WASSRO 

UASSRl 

WASSR2 

WASSR3 

weiT - 

JAPTHD 

SATYC 

SATYl 

SATY3 

$ATY4 

$AUT08 

SBDADR 

SBDDAT 

$8ELL 

SBIN 

$CHARC 



104405 
104401 
104402 
104404 
104403 
177660 
177662 
177664 
177666 
177670 
1 7/672 
: 77674 
1/7676 
1/7620 
177622 
177624 
177626 
177630 
177632 
177634 
177636 
177640 
177642 






77ii / / 

: 177646 

: 177650 

■■ 177652 

■■ 17765^ 

'■ 177656 

: 1/7600 

: 177602 

■■ 177604 

■ 177606 
: 177610 

■ 177o12 
: 177614 
: 177616 

■ OOOoOO 
:X000006 

001276 
001256 
001264 
001266 
001270 
001272 
000100 
000204 
006022 
005776 
006004 
006014 
001134 
001122 
001126 
001214 
006516 
005772 



SCKSWR 
SCLR-T 
SCMTAG 

$CM1 : 

$CM2 : 

$CM3 : 

$CM4 : 

SCNTLC 

SCNTLG 

SCNTLU 

SCPUOP 

SCRLF 

$D8LK 

$D820 

SDEVCT 

SDOAGN 

SDTBL 

lENDAD 

SENDCT 

SENULL 

5ENV 

$EOP 

SEOPCT 

SERfLG 

$ER«AX 

SERROR 

lERRPC 

JERRTB 

SERTTL 

SESCAP 

SETABL 

$ETEND 

$FATAL 

$;FL6 

SFILLC 

SFILLS 

SGOADR 

SGDDAT 

$6ET42 

SGTSUR 

5HD 

$HI8TS 

SICNT 

SiLLUP 

SiNTAG 

SITEMR 

$LF 

JLFLG 

SLOOP 

SLPADR 

SLPERR 

SMAIL 

SMBADR 

$MFLG 

SMNEU 

SMSGAD 



004306 

036242 

001100 

000006 

000014 

000006 

000006 

001312 

005253 

005246 

001252 

001221 

006762 

007066 

001234 

036262 

006752 

036252 

036054 

036324 

001244 

00)245 

036024 

036046 

001103 

001115 

003270 

001116 

001320 

001112 

001212 

001244 

001254 

001226 

006242 

001156 

001155 

001120 

001124 

036224 

004556 

OOOOOO 

000204 

001104 

007452 

001135 

001114 

00122? 

006241 

036320 

001106 

001110 

001224 

000206 

006240 

005271 

001240 
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SMSGLG 


001242 




SQUES 


001220 


$SCOPE 


003042 


$TMP4 


001206 


STYPE 


005432 




SMSGTY 


001224 




SRDr.HR 


004630 


$SETUP= 


000137 


$r«P5 


001210 


l^'iPlZ 


005644 




JMSWR 


005260 




SRDLIN 


004760 


SSTUP = 


M1777 


$TN = 


000046 


$TYPEX 


00577/f 




SMXCNT 


001506 




$RDSZ = 


000010 


SSVLAD 


003216 


$TP8 


001152 


STYPOC 


006344 




tNUlL 


001154 




$REGAD 


001160 


iSVPC = 


000204 


$TPFLG 


001157 


STYPON 


006360 




$NwrsT= 


000001 




SREGO 


001162 


$SWR = 


173400 


STPS 


001150 


STYPOS 


006320 




$0CNT 


006542 




SREGI 


001164 


S-SWREG 


001246 


STRAP 


007206 


SuNir 


001236 




SOCTVL 


007170 




SREG2 


001166 


$SWRMK= 


000000 


$TRAP2 


007230 


SUNITM 


0002^ ' 


1 


SOMODE 


006544 




$REG3 


001170 


$TBJT 


001310 


$TRP - 


000015 


SUSWR 


0012:)^ 




$ovr.R 


003252 




$RCG4 


001 1/2 


STESTN 


001230 


STRPAD 


007242 


SXOFF ::: 


000023 




SPASS 


001232 




$REG5 


001174 


$TKB 


001146 


%^^m 


000210 


$XON ^' 


000021 




SPASTM 


000212 




SRESRE 


007030 


$TKS 


001144 


SrSTNM 


001102 


$XTSTR 


003054 




$PWRmD 


007434 




SRTNAD 


036322 


$TMPO 


001176 


i^'ii'im 


005236 


$$GET4::: 


000001 




tPURON 


007274 




tiUHH 


036516 


$rMPl 


001200 


STYPBrj 


006244 


SOFILL 


006543 




SPWRMG 


007430 




tSAVRE 


006772 


$TMP2 


001202 


STYPUS 


UU6546 


.$X = 


000204 




$PWRUP 


007346 




$SAVR6 


007456 


$TMP3 


001204 












. Al^S. 


036330 
000000 


000 
001 




















FRRORS 


OETf-CTEP 


: 




















ViRIUAl, 


MhftORY 


USFD: 


^5080 WORDS ( 216 PAGES) 














OYN'AMir 


MEriORY: 


200.^4 


WORDS ( 


77 PAGES) 
















ELAPSED 


TIME: 


00:10:1i 


3 
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SEQUENCE 149 


SYMBOL 
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CREF vol 


SYMBOL 


VALUE 


REFERENCES 






ABASE 


z: 


000000 


20-1 2A9 






ACDUl 


:= 


000000 


20-12A9 






ACDW2 


— 


000000 


20-1249 






ACPUOP 


s 


000000 


20-1249 


20-1249 




ACSMPS 




03535A 


54-2027 


*105-4437 


*105-4438 105-4/.39 *105-4444 


ACSMSP 




035336 


54-2018 


*105-4426 


105-446/' ^105-4506 


ADOUO 


— 


000000 


20-1249 






ADDU1 


r: 


000000 


20-1^49 






ADDWIO 


^ 


000000 


20-1249 






ADDW11 


— 


000000 


20-1249 






ADDU12 


r 


ooooco 


20-1249 






ADDW1^ 


^ 


000000 


20-1249 






ADDWU 


rr 


000000 


20-1249 






ADDWIS 


i; 


ooooco 


20-1249 






ADDU2 


z: 


000000 


20-1249 






ADDW3 


r 


000000 


20-1249 






ADDW4 


r 


000000 


20-1249 






ADDU5 


™ 


000000 


20-1249 






ADPW6 


:r 


OOC JO 


20-I24V 






ADDW/ 


z: 


OOOuOO 


20-1249 






ADDW8 


— 


000000 


20-1249 






ADDW9 


— 


000000 


20-1249 






ADEVCT 


— 


000000 


20-1249 


20-1249 




ADEVM 


« 


000000 


20-1249 






AENV 


:r 


000000 


20-1249 


20-1249 




AENVM 


— 


000000 


20-1249 


20-1249 




AFATAL 


- 


000000 


20-1249 


20-1249 




AMADR1 


- 


000000 


20-1249 






AMADH,^ 


» 


000000 


20-1249 






AMAD;-^3 




000000 


20-1249 






AMA0,74 


T2 


000000 


20-1249 






AMAMSl 


^ 


000000 


20-1249 






AMAMS? 


— 


000000 


20-1249 






AM,\MS3 


t,. 


000000 


?0-i249 






AMAMSh 




000000 


20-1249 






AMSGAD 


- 


000000 


20-1249 


20-12''.^^ 




AMSGLG 


" 


000000 


20-1249 


20-1249 




AMSGfY 


;. 


000000 


20-1249 


20-1249 




AMTYPI 


r; 


000000 


20-1249 






AMTYPr 


^ 


000000 


20-1249 






AMTYP3 


~ 


000000 


20-1249 






AMTYP4 


— 


000000 


20-1249 






APASS 


i: 


000000 


20-1249 


20-1249 




APRINI 




00P060 


#27-1 S52 


58-2126 


79-3360 104-4394 


APMIUR 


— 


000000 


20-1249 






APICSU 


- 


000040 


43-1903 


#^4-1904 




APfPNV 


~ 


000001 


37-1787 


43-1<505 


44-1904 (^44-1904 


APfSJZ 


- 


000200 


^^44-1904 


S8-2106 




APrSPO 


- 


O001OO 


/^^~^Q^)'^ 


'^-190'» 


#44-1904 


ASUREG 


~ 


000000 


20-1249 


^0-1249 




AUilN 


r: 


000000 


20-12^9 


20-1249 




AUNIT 


■r 


000000 


20-1249 


20-1249 





*105-4445 105-4446 105-4450 #105-4505 
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SYMBOL 

AUSWR 

AVFCT1 

AVECT^ 

BADPC 

BITO 

BITOO 

BITOl 
fiIT02 

BITOA 

8iT05 

BIT06 

BIT07 

D1T08 

BIT09 

HIT! 

B1T10 

Bini 

flITl? 

BITI-^ 

BITU 

BIT13 

BIl? 

BIT? 

8n^» 

BITS 

BIT6 
BIT7 
DIT8 
BIT9 
HPT\/r(; 

CNT.'JLr 
CPSAV^ 
CPULKR 

CRLF 

CSMINS 

CSMSUB 

CSMO 

CSfll 

CSMIST 

CSM2 

CSW2ND 

CSM3 

is«5 

lSM6 



CREATED BY MACRO ON 12-JAN-82 AT 



CROCS REFERENCE 
VALUE 
= 000000 
= 000000 
= 000000 
00130^f 
^- 000001 
= 000001 

^ 000002 

- OOOOUA 
^^ 000010 
-~ 000020 
= 000040 

- 000100 
= 000200 

- 000400 
^ 001000 

:■■ 00000.'' 

^: OOPOOO 
^ 004000 
= 010000 

- 020000 
^ 040000 

- 100000 

- 000004 
-- 000010 
^ 000020 

=:: 000040 

■-■■ 000100 
^- 000200 
■^ 000400 
^ 001000 
-^ 000014 
^- 104410 

00S?61 

001^0.* 

003266 
^- V/V/66 
■ 0000 iS 
■-' 000200 

055744 

034550 
-- 007000 
:= 007010 

035326 
^- 007020 

035530 
:^ 007030 

035332 
^ 007040 
= 007050 
^- 00/060 



REFERENCES 

20-1249 

20-1249 

20-1249 

^20-1249 

#15-1197 

/^15-1197 

105-4472 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1 i97 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1 i 97 
#15-1197 
#fS-n97 

#15-1197 

36-1785 

41-1888 

4C-1882 

*36-1785 

.'M 5-1 210 

./I5-M97 

#15-1197 

55-1981 

109-4571 

104-4 599 

#15-1185 

#1_^-?186 

54-v'028 

#15-1187 

54-2029 

#15-1188 

•>4-2050 

#15-1189 

#15-1190 

#15-1191 



12:24 PAGE 2 
bbUUtNCfc 150 

CftEf vol 



H 12 



20-1249 



*28-l591 
93-4084 
15-1197 
105-4478 
15-1197 
15-1197 
15-1197 
15-1197 
15-1197 
15-1197 
15-1197 
15-1197 
15-1197 
89-3971 
37-1787 

110-4609 

37-1787 

36-1785 

105-4452 

28-1582 

103-4370 

15-1208 

15-1209 



V7-1787 
#41-1899 
40-1882 
56-1785 
54-2003 
43-1903 
43-1903 
53-198? 
#109-4603 
#105 -4405 
100-4506 
109-4603 
*105-4427 
109-4603 
*105-4428 
109-4603 
*105-4429 
109-4603 
109-4603 
109-4603 



54-20?^ 
93-4121 
36-1785 
105-4465 



98-4244 
36-1785 



36-1785 

36-1785 37-1787 

89-4004 91-4034 



105-4436 105-4451 
28-1606 77-3312 
58-2125 



37-1787 

#41-1886 

#36-1785 

*56-2066 

A ^-1903 

43-1903 

53-1984 

106-4523 
101-4329 

105-4473 

105-4^79 

105-4486 



#50-1910 

*37-1787 

52-1957 
53-1992 

107-4541 
102-4352 

#105-4502 

#105-4503 
#105-4504 



98-''.277 
37-1787 



37-17a7 105-4443 105-4454 105-4466 



105-4493 
91-4071 



106-4520 
77-3320 



96-4180 



96-4212 



'57'}7B7 



52-1958 
58-2107 

108-45^8 
103-437!) 



39-1880 



53-1973 
58-2107 



105-4417 



53-197/ 



53-1979 



53-19^0 















I 12 


■ 


— ■ — ^- 




_ . , _ 


CKKTBD 


CREATED BY 


MACRO ON 12-JAN-82 AT 


12:24 


PAGE 3 




















SEQUtNCE 151 












SYMBOL 


CROSS REFERENCE 








CREf vol 












SYMBOL 


VALUE 


REFERENCES 


















CSM7 


= 007070 


#15-1192 


109-4603 
















DDISP 


- 177570 


#15-1197 


20-1249 


58-2106 














0F1 


01603^ 


23-1392 
#55-2035 


24-1422 


24-1434 


24-1447 


25-1458 


25-1464 


25-1471 


25-1478 


25-1485 


DF12 


016057 


21-1254 
#55-2039 


21-1278 


21-1284 


21-1290 


22-1301 


22-1307 


22-1320 


23-1350 


23-1360 


DF2 


016041 


21-1260 


24-1453 


#55-2036 














DF3 


016050 


21-1266 


21-1272 


22-1295 


22-1313 


22-1 "526 


^2-^'552 


22-1338 


23-1367 


23-1374 






23-1386 


24-1403 


24-1409 


24-1428 


24-1441 


25-1491 


25-1509 


26-1514 


26-1522 






#55-2037 


















DF32 


016065 


23-1380 


23-1398 


#55-2040 














DF5 


016054 


23-1343 


24-1415 


25-1497 


25-1503 


#55-2038 










DHl 


012672 


21-1252 


#53-1963 
















OHIO 


013042 


21-1264 


21-1270 


#53-1965 














0H12 


015102 


21-1276 


#53-1966 
















DHl 3 


013162 


21-1282 


#53-1967 
















OHK 


01324? 


21-1288 


#53-1968 
















0H15 


013322 


22-1293 


#53-1969 
















DH16 


013362 


22-1299 


#53-1970 
















Dill? 


013442 


22-1305 


#53-1971 
















DM? 


012752 


21-1258 


#53-1964 
















0H20 


013522 


22-1311 


22-1330 


23-1341 


26-1520 


#53-1972 










DH21 


013562 


22-1317 


#53-1973 
















0H22 


013677 


22-1324 


#53-1975 
















0H2^ 


015737 


22-1336 


#53-1976 
















DH26 


013777 


23-1347 


#53-1977 
















DH2/' 


014111 


23-1354 


#53-1979 
















DM30 


014306 


23-1364 


23-1371 


24-1438 


25-1468 


25-1475 


25-148? 


#53-1984 






DH32 


014362 


23-1378 


23-1396 


24-1451 


25-1495 


25-1501 


#53-1986 








DH33 


014401 


23-1384 


#53-1987 
















DH3A 


014441 


23-1390 


#53-1988 
















DH36 


014532 


24-1401 


#53-1989 
















DH37 


014572 


24-1407 


#53-1990 














j 
j 


DMAO 


014632 


24-1413 


#53-1991 














1 


DHAI 


U14/03 


24-i419 


#53-1992 














i 


0H^2 


01S007 


24-1426 


#53-1994 














I 


l)H43 


01S04/' 


24-1432 


24-1445 


#53-1995 












1 


DH4^ 


015117 


25-1456 


25-1462 


25-1489 


#53-1996 










1 


0H45 


01^157 


#53-1997 


















0H55 


015207 


25-1507 


#53-1998 
















DH57 


015246 


26-1512 


#'i3-1999 














1 


DISPLA 


001142 


#20-1249 


36-178S 


37-1787 


*58-2106 


*58-?106 








! 


DISPRE 


000174 


#1-^-1246 


58-2106 














1 


DOWFLP 


035316 


*105-4410 
#10^-4498 


105-4430 


*)05--444b 


*1 05-4463 


*105-4469 


*105-4475 


*105-44b1 


*105-4488 


105-4491 


OSWR 


= 177570 


#15-1197 


20-1249 


58-2106 














on 


015306 


21-1253 


#S/,~200? 
















L)MO 


015J44 


21-1265 


21-1271 


#54-2005 














\)J^2 


015556 


21-1277 


#54-2006 
















PfH 


01537^ 


21-1233 


#54-2007 














i 


oru 


015412 


21-1289 


#54-2008 
















0T15 


015430 


22-1294 


#54-2009 



























J 12 




CKKTBD 


CREATED BY 


MACRO ON • 


2-JAN-82 AT 


12:24 


PAGE 4 












SEQUENCF 152 




SYMBOL 


CROSS REFERENCE 








CREF vol 




SYMBOL 


VALUE 


REFERENCES 








DT16 


015442 


22-1300 


/!'54-2010 








DT17 


015460 


22-1306 


*54-201i 








DT2 


015324 


21-1259 


/?^54-2004 








DT20 


015476 


22-1313 


22-- 331 


23-1342 


26-I521 #54-2012 




DT21 


015510 


22-1319 


#54-2013 








f)T22 


015526 


22-1325 


23-1385 


#54-2014 






D12A 


015540 


22-13:^7 


r:4-i4o;i 


#54-2015 






DT26 


015552 


■?y-Vv\9 


.^54-2016 








DT2? 


015570 


?:5-'i5S9 


flf54-?017 








DT^O 


015606 




23-1373 


24-1440 


25-1470 #54-2018 




DT32 


015620 


r'>l3/9 


23-1397 


24-1452 


25-1496 25-1502 


#54-2019 


DT34 


015626 


;;3-i39i 


#54-2020 








0T56 


015642 


p^-Ko.;^ 


#54-2021 








DT40 


015654 


.Vt-I414 


#54-.202'"^ 








dt;i 


015664 


p4-14?1 


#54-2023 








DTA2 


015700 


^^■^^w.^ 


#54-2024 








DTA^ 


015712 


24-1433 


#54-2025 








DK5 


015726 


24-1446 


#54-2026 








DTA6 


015742 


2.'>-1457 


25-1463 


#54-2027 






Dt^;/ 


015754 


2S-1477 


#54-2028 








DT50 


015766 


25-1484 


#54-2029 








DT52 


016000 


25-1490 


#54-2030 








OTSS 


016010 


25-1508 


#54-2031 








nrs/ 


016022 


26-1513 


#54-2032 








LMTVEC 


= 000030 


ff^5-^^97 


*58-2106 


*58-2106 






EMI 


007522 


21-1251 


#52-1917 








EM10 


007631 


21-1263 


#52-1919 








EMU 


007701 


21-1269 


#52-1920 








EMI 2 


007750 


21-1275 


#52-1921 








EMI 3 


010022 


21-1281 


22-1504 


22-1310 


#52-1922 




^MK 


010073 


21-1287 


#52-1923 








EMI 5 


010154 


22-1292 


#52-1924 








EM16 


Cn;237 


22'^2<^& 


#52-1925 








EM2 


0075'; 


21-1257 


#52-1918 








EM21 


01 03^!, 


22-1316 


#52-1926 








EM22 


010362 


22-^5'^':> 


#52-1927 








LM2? 


010431 


22-1329 


#52-1928 








EM24 


010464 


22-1335 


#52-1929 








EM2S 


010523 


23-1340 


#52-1930 








EM26 


010570 


23-1346 


#52-1931 








EM27 


010636 


23-1353 


#52-1932 








EM30 


010^3 


23-1363 


#52-193? 








EM51 


0107.^3 


23-1370 


#52-1934 








EM32 


011021 


23-1377 


#52-1935 








EM33 


011057 


23-1383 


#52-1936 








EM3A 


011135 


23-1389 


#52-1937 








EM35 


011216 


23-1395 


#52- i 938 








EM36 


011252 


:4-140O 


#52-1939 








EM37 


011327 


74-1406 


#52-1940 








EM40 


0113^2 


24-U12 


#52-1941 








EMAl 


01!m57 


24'V,1S 


.«'52-1942 








EM42 


011523 


24-1425 


#52-1943 





















K 12 


^ '"'"■ 




-. — „.. — „ — 


„ 





CKKTBD 


CREATED BY 


MACRO ON 12-JAN-82 AT 


12:24 


PAGE 5 






















SEQUENCE 153 














SYMBOL 


CROSS RfiFERENCE 








CREF V01 














SYMBOL 


VALUE 


REFERENCES 




















EMA3 


011566 


?4"U31 


24-1444 


#52-1944 
















EMAA 


011633 


24-1437 


#52-1945 


















EM45 


011701 


24-1450 


#52-1946 


















EMA6 


011740 


25-1455 


#52-1947 


















EMA7 


012002 


25-1461 


#52-1943 


















EM50 


012041 


25-1467 


#52-1949 


















Eii51 


012070 


25-1474 


#52-1950 


















EMS? 


012126 


25-1481 


#52-1951 


















EM53 


012152 


25-1488 


#52-1952 


















EM54 


012217 


25-1494 


#52-1953 


















EM55 


012263 


25-1500 


#52-1954 


















EM56 


012327 


25-1506 


#52-1955 


















EM57 


012A13 


26-1511 


#52-1956 


















EM58 


01 2466 


26-151/ 


#52-195/' 


















ERLOOP 


002624 


*31-I655 


*32-1676 


32-1697 


#32-1704 


*33-1722 


33-1744 


*34-1765 


34-1780 






ERPREP 


002444 


#31-1654 


32-1695 


33-1742 


34-1 ^^79 














ERROR 


= 104000 


#15-1197 


28-1599 


28-1601 


56-2064 


57-2093 


60-2171 


60-2179 


60-2187 


60-2194 








61-2242 


61-2250 


61-2258 


61-2265 


62-2299 


62-2310 


62-2317 


62-2321 


64-2374 








64-2385 


64"2392 


C4-24G6 


65-2445 




65-2463 


65-2477 


66-2518 


67-2SS3 








67-2562 


67-2586 


67-2602 


67-2611 


68-2653 


68-L679 


69-2710 


70-2737 


70-2755 








71-2822 


77-3326 


77-3330 


79-3377 


79-3380 


79 3392 


79-3399 


79-3404 


79-3411 








79-3419 


79-3425 


79-3432 


80-3443 


81-3479 


81-3482 


81-3493 


81-3500 


81-3505 








81-3512 


81-3520 


31-3526 


81-3533 


82-3544 


83-3575 


83-3591 


83-3600 


83-3o0(^ 








83-3616 


83-3626 


83-3634 


83-3643 


85-3652 


84-3670 


84-3687 


84-3696 


84-3703 








84-3712 


84-3722 


84-3730 


84-3740 


84-3749 


85-3786 


85-3789 


85-3800 


8^-3807 








85-3812 


85-3819 


85-3827 


85-3833 


85-3840 


86-3853 


87-3876 


87-3879 


87-3891 








87-3898 


87-3903 


87-3910 


87-3918 


87-3924 


87-3931 


88-3943 


89-3981 


89-3988 








89-3994 


89-4001 


90-4014 


91-4045 


91-4052 


91-4061 


91-4069 


92-4078 


93-4095 








93-4102 


93-4111 


93-4119 


9<-4128 


95-4148 


95-41^3 


96-4190 


96-4197 


96-4203 








96-4210 


97-422'- 


98-4PS5 


98-4262 


98-4268 


98-4275 


99-4288 


100-4313 


101-4336 








102-4359 


103-438) 


105-4424 


105-4442 


105-4453 


105-4465 


105-4471 


105-4477 


105-4484 








105-4490 


109-458-> 


109-4591 
















ESRTYP 


00^6S0 


3/- 1/8,^ 


#39-1^89 


















ERRVEC 


^ 000004 


#15-1197 
*58-2117 


36-1785 


*36-1785 


*36-178S 


*36-178S 


58-2106 


*53-2106 


*58-2106 


*58-2116 




GNS 


r ****** 


17-1246 


17-1246 


50-1910 


50-1910 


50-1910 


50-1910 


50-1910 


50-1910 


50-1910 








50-1910 


50-1910 


50-1910 


50-1910 


50-1910 


50-1910 


50-1910 


50-1910 


50-1910 








50-1910 


50-1910 


50-1910 


50-1910 


50-1910 


50-1910 


50-1910 


50-1910 


58-2107 








58-2108 


110-4609 


ri 0-4609 
















GISWR 


:-• 104407 


41-1895 


#50-1910 


58-2107 
















HT 


= 000011 


#15-1197 


43-1903 


43-1903 
















IRSAVF 


003646 


*37-1787 


37-1787 


*37-17G7 


*37-1787 


37-1787 


37-1787 


57-1787 


57-1787 


#57-1787 




JNir 


G20666 


#58-2124 




















rnrvpr 


= 000020 


#15-1197 


*58-2106 


*58-2106 
















kDPARU 


= l,-VJ60 


#15-1198 


27-1548 


* 77-33 13 


* 77-33 18 














KDPARl 


= 172362 


#15-1198 




















KDPARU 


= 172364 


#15-1198 




















KDPAR3 


- 172366 


#15-1198 


















1 


KDPARA 


= 172370 


#15-1198 


*73-286Q 


*77-3311 














1 


KDPAR5 


-■ U2Sr2 


#15-119o 


















1 


KOPARd 


= ^ 7 2:17^ 


#15-1198 




















K0PAR7 


^ 172376 


#15-1198 


















i 



I ID 



CKKTBD 

SYMBOL 
SYMBOL 
KDPDHO 
KDPDRl 
KOPDJ^? 
t(DPDR3 
KDPDRA 
KDPDR'S 
KnPDR6 
KDPDK7 
KfiRSTK 



CREATED BY MACRO ON l^-JAiM-82 AT 12:24 



PAGE 6 



L 12 



CROSS REFERENCE 
VALUE 
=: 172320 
= 172322 
= 17252A 
= 172326 
= 172330 
'- 172^32 
^ 172334 
:= 172336 
'■= 001100 



KIPARO 


■■- 172340 


KIPAR1 


^ 172342 


KIPAR2 


^- 172344 


KIPAR3 


^ 172346 


KIPAR4 


= 172350 


KIPARS 


^ 1723.S2 


K1PAR6 


- 1723H 


KIPAR7 


^ 172356 


KIPDRO 


^.- 172300 


KIPDR! 


^ 172302 


KIPDR2 


r= 1/2304 


KlPnR3 


=■ 172306 


KIPDR4 


^ 172310 


KIPDRS 


:- 172'512 


KIPDR6 


:- 172314 


k;ipdr/ 


:- 1/2516 


KSP 


=X000006 



LF 


=■■ 00001? 


LOOP 


020^60 


MFPDLO 


003004 


MFPDLP 


002770 


MFPDPS 


00?/ 72 


MfPDTS 


002/46 


MFPDVC 


005040 


NfPDVl 


033564 


MrPiLD 


002 S'f^ 


MFPJLP 


002-^16 



REFERENCES 
#l!>-n98 
#15-1198 
#15-1198 
#15-1 193 
#15-1198 
#15-1198 
#15-1198 
^15-1198 
^15-1211 
57-25/0 
79-33/1 
^15-T198 
#15-n'?3 
#15-1198 
#15-1193 
#15-1198 
#15-1198 
#15-1198 
#15-1198 
#15-1198 
#15-1198 
#15-1198 
#15-1198 
#15-1 198 
^67-2546 
*81-3535 
#15-1198 
^I'^'-i 198 
#15-1198 
#15-120^ 
^3y-1ri43 
"^39-1864 
*5/-?0H8 
*64-2<02 
♦65-2432 
71-2793 
*8u-5^4b 

.07 ".' L "» . 
^O » ,J Jf ., 

*8^-3/44 
*86-3856 

*9o-^or/ 

^97-422/ 
#15-119/ 
#5d-2l09 
*3<-1/67 
#34-17/0 
#34-1 //I 
#34-1/65 
34-1 7/3 
96-4185 
*32-1678 
#32-1683 



^73-2857 
*73-2858 
*73-2859 
*77-3310 



27-1539 
62-2305 
6/-25/S 

81-3^/3 
27-1547 



^60-2152 
*60-2153 
*67-2545 

27-1557 
27-1535 



*o'i-2355 
v^3-1732 
*6/-;^61S 
.8^ :vV2 
*6<-2.s56 



28-1591 

39-1845 
v::^9-18/0 

5/ -2089 
*64-24IO 
*66-2514 
*71-2798 
*80-3446 
^83-35/8 
*84-3/45 

8/-3868 
*95-4143 
*y9-4286 

43-1903 

Mu-4o09 
*34-]768 

54-1 7S1 
*96-4184 

9r ^87 
#5s i/83 
#9/ -*219 
*32-1679 

32-1698 



SEQUENCE 154 

CREF vol 



*74-30[1 
*/4-3012 
^7'i-3013 
*89-3965 



64-2362 
68-2636 
85-3783 



*66-2501 
^^66-2502 



*66-2503 
^■^3-1/36 
■■'/0-2/52 
*89-4003 
*6/-254/ 



*:^8"1S92 

^jy-iB'io 

•■■39-18/1 
VS/-2095 
*64-24n 
*6/-25"'0 
*74-3177 

81-34/3 
*83-3647 
^84-3/51 
*88-3938 

95-4144 
*99-428/ 

45-1903 

#34-17/4 
96-4185 

yo-4194 
*96-4ia5 

#32-168/ 
79-3384 



*95-4140 *96-41 73 



64-2366 
68-26S& 
85-3844 



^/4-3014 
*60-2163 
*70-2762 
*96-418'' 
*6/"2616 



*28"15y3 
*39-1850 
*56-2061 
V5/-2096 
*65-2453 
*6/-25/5 
*7/-3506 
*81-3475 
*S3"3648 
«*84-37S? 
*88-3939 
9i--4145 
*99-4290 



96-4201 



64-23/9 
68-2684 
87-3873 



*70-273O *79-3362 



*/4-3i/6 
*61 -223s 
-^73-2856 
*96-4214 



*28-1604 
*39-lS51 
*56-2062 
*58--2110 
*65-243/ 
*68-2636 
*77-331^ 
*82-3539 
*83-3654 

85-57/8 
•88-3945 

95--41Si 
*99-4291 



96-4207 



65-2433 
70-2741 



* 64-2360 
*/4-3010 
*98-4246 



* 28-1 605 
*39--'l85/ 

S6--2063 
*64-2362 
•*6,--245U 
*68'2658 

79-3371 
*82-3540 
A85-3655 
^85-3844 
*88-39';6 
*95-4155 



65-243/ 
71-2798 



*65-2431 
*79-3366 
*98-42/9 



*33-1/31 

39-1859 

* 56-20'')/ 

*64-2366 

*65-;;-;./2 

'*68~'t."uH4 
*79-33/3 
♦82-3546 
*84-3662 
*86-3848 
♦90-4012 
^97-4222 



65-2450 
74-3177 



♦66-2504 
♦79-3434 



♦39-1790 
♦39-1860 
♦56-2068 
♦64-2379 
♦65-^473 
♦70-2/41 
♦80-3438 
♦82-3547 
♦84-3667 
♦86-3849 
♦90-4013 
♦97-4223 



66-2514 
77-33 19 



♦66-2528 
♦81-3466 



♦39-1818 
♦39-1863 
♦57-2087 
♦64-2401 
*65-?481 
71-2792 
♦80-3439 
♦83-3567 
♦84-36/3 
♦ 86-38*^5 
'^90-4016 
*97-4?26 



81-3485 85-3792 



b/-3883 



89-39/4 



98-4248 



CKKT3D 


CRtATtD BY 


MACRO ON 12-JAN-82 AT 
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M 12 


















SEQUENCE 155 












SYMBOL 


CROoS REFERENCE 








CREF VOi 












SYMBOL 


VALUE 


Rc^'ERENCES 


















MFPIPS 


003520 


A^32-1684 


*79-33S6 


•81-5486 


•85-5793 


•87-3384 


•89-3975 


•93-4249 






MFPITS 


002A6A 


/A'S2"1676 


79-3389 


79-3396 


79-3402 


79-3408 


79-3416 


79-5425 


79-5450 


81-5490 






81-3497 


81-3503 


81-3509 


81-5517 


81-5524 


81-5551 


85-5797 


85-5804 


85-5810 






85-3816 


85-3824 


85-3831 


85-3833 


87-5888 


8/-5895 


87-5901 


87-5907 


87-5915 






87-3922 


87-3929 


89-39/8 


89-3985 


89-5992 


89-5998 


98-4252 


98-4259 


9^-4266 






98-4272 


















MFPIVC 


002622 


32-1686 


#32-1703 


•79-5588 


•81 "3488 


•85-5794 


•87-3885 


•89-5976 


•98-4250 


1 


MFPIV1 


027566 


79-3338 


#80-3438 














1 


MFPlVr"? 


030164 


81-34/0 


S1-3*t88 


#82-i'.539 














MFPIV3 


031674 


35-3777 


85-3794 


#86-.o8'i8 














MFPIV: 


032304 


87-3865 


87o38:* 


#83-3938 














MFPiVS 


U32S62 


89-3976 


#90-4008 
















MFPIV6 


034036 


98-4250 


#99-4283 
















MGMERR 


016142 


32-1688 


33-1735 


34-17/5 


#57-2079 


58-2118 


60-2216 


tw-2281 


62-2301 


62-2504 






6^»-2414 


65-2485 


66-2529 


67-2617 


70-2761 


71-2851 


77-5352 


81-5472 


85-5571 






83-3581 


84-3666 


^4-5676 


85-3779 


87-3869 










MGMFLG 


016U4 


ff57-20B0 


•57-2094 


•58-2122 














MMRU 


= 17757^ 


#15-1201 


28-1594 


•28-1602 


•58-2124 


•60-2167 


•60-2198 


•61-2238 


•61-2269 


•62-2297 






^73-2854 


•73-2863 


*73-?882 


•75-2887 


•75-2892 


•^5-2897 


•73-2902 


•/5-2911 


•73-2916 






*73-2922 


•73-292/ 


•/3-293? 


•75-2957 


•75-29^2 


• 75-'^:?47 


•75-2952 


•75-2957 


•75-2965 






* 73-2968 


•73-2972 


•/3-29// 


•75-2982 


•75-2936 


•75-2992 


•75-2997 


•74-5027 


•7s '5053 






•74-3037 


•74-3043 


•74-3055 


•74-3081 


•/4-3087 


•74-5095 


•74-5099 


•74-5105 


•74-5108 






•74-3114 


•74-3125 


•74-3131 


•74-5156 


•74-3142 


•74-5149 


•74-3155 


•74-5162 


•74-5165 






•74-3172 


•74-3175 


•75-5191 


•75-5197 


*75-^205 


•75-3206 


•75-3211 


•75-5215 


•75-5221 






•75-3224 


*7''^'322S 


• 75-5231 


•76-5247 


•76-5255 


•76-5259 


•76-5262 


•76-5267 


•76-5271 






•76-3276 


•76-5279 


•76-5284 


•76-5287 


•77-5507 


77-5521 


•7/-5531 


•79-5561 


90-400a 






92-4075 


94-4''25 


97-4219 


99-4285 


•100-4305 


•100-4508 


•101-4328 


•101-4331 


•102-4351 






•102-4354 


•103-4374 


•103-4377 


•105-4416 


•105-4422 


•105-4441 


•105-4443 


•105-4449 


*105-4454 






M 05-4464 


•105-4466 


•105-4470 


•105-4472 


•105-4476 


•105-4478 


•105-4482 


•105-4485 


•105-4489 






•109-4599 


















mu'\ 


r- ^rrw^ 


#15-1202 


28-1595 


77-5322 


90-4009 


92-4076 


94-4126 


97-4220 


99-4284 




MMR2 


■■■ 1//:>/6 


#15-1203 


28-1596 


7/-5323 


90-4010 


92-4077 


94-4127 


97-4221 


99-4285 




MMR3 


= 17^S16 


#15-1204 


•28-1582 


•28-1606 


•58-2125 


•75-2864 


•/5-3189 


•75-3252 


•/6-3245 


•76-5288 






* 77-331 2 


•/7-3320 


•89-39/1 


•89-4004 


90-4011 


•91-4034 


•91-4071 


•93-4084 


•93-4121 






*%-41d0 


•96-4212 


•98-4244 


•98-4277 


•100-4301 


•101-4324 


*1 02-4347 


•105-4370 


*104-459f) 






•^06-4518 


•107-4536 


•108-4554 


•109-4569 


•109-4600 










mwc 


= 000250 


#15-1198 


•32-1686 


•.32-1 6S8 


•53-1733 


•33-1735 


•34-1/75 


•34-1775 


•58-2118 


•58-2119 






•60-216? 


•60-2216 


•61-2233 


*61-2281 


^62-2296 


*0v. -2301 


•62-2304 


•64-2359 


•64-2572 






*64-2414 


•65-2430 


•65-2443 


•65-2485 


•66-2507 


•66 2529 


•67-2567 


*67-25/3 


•6/-261/ 






•73-2861 


•/7-3302 


•77-5503 


*7/-5532 


•77-3535 


•81- ;470 


•81-547? 


•83-5568 


•83-3571 






*83-3579 


•83-3581 


•84-5663 


•84-5666 


•84-3674 


•84- '676 


•85-5777 


•85-5779 


•87-3865 






•87-3869 


















MTPILO 


002676 


•33-1724 


•35-1725 


#33-17^4 














MTPILP 


002654 


#33-1728 


33-1745 


83-5583 


84~3A/8 


91-''<036 


93-4086 








MTPIPM 


002656 


#33-V29 


•83-3584 


•84-36/9 


•91-403/ 


•93-4087 










NTPJTA 


002^^20 


•33-1726 


#33-1738 
















MTPITS 


002626 


#33-172? 


83-3587 


83-3596 


83-3604 


83-3612 


85-3622 


8^-36^1 


83-^640 


84-3683 






84-3692 


84-3/00 


84-5/08 


84-3718 


84-5/2/ 


84-3/57 


91-4041 


91-4049 


91-4057 






91-4066 


93-4091 


93-4099 


93-410/ 


93-4116 










mpivc 


002744 


3'!-1^53 


#33-1747 


«84-5630 


•91-4038 


•95-4088 










MTPJV1 


050614 


83-3568 


83-3579 


#83-56-;/ 














MTPiV2 


031260 


84-3663 


84-3674 


84-5680 


#84-3744 













r" 



CKKTBD 

SYMBOL 

SYMBOL 

HIPiV3 

MTPIVA 

NDFLAG 

NODSPA 

PATCH 

PBAHl 

PBALO 

PC5MPS 

PCSMRO 

PCSMSP 

PFECDF 

PFECDH 

PFECOT 

PFECEM 

PFECWS 

PIRO 

PIRQVE 

PRO 

PRl 

PH2 

PR3 

PRA 

PR5 

PR6 

PK/ 

PS 

PSW 



CRtATED BY MACRO ON 12-JAN-82 AT 



CROSS REFERENCE 
VALUE 

0352A? 

0022A2 

002232 

0162:;2 

001502 

001300 

035320 

03l>32A 

035322 

004502 

004242 

004272 

004202 

004172 
= 177772 
= 000240 
^ 000000 
~ 000040 
^ 000100 
^ 000140 
= 000200 
= 000240 
••= 000500 
^-: 000540 
= ^77776 
= 177776 



PWRMSG 


007460 


PWRVEC 


^ 000024 


RDCHR 


:- 104411 


RDLIN 


= 104412 


REGCH6 


035770 


RE6DAT 


036006 


REGLAB 


035764 


RESRE6 


= 104414 


RESVEC 


= 000010 


RETURN 


055342 


R6 


=X000006 


R7 


=X000007 


SAVREG 


= 10441;^ 


SCOPE 


= 000004 



REFERENCES 
vi-4U:;tt 
93-4088 
#28-1584 
#28-1581 
#57-2100 
#20-1249 
#20-1249 

* 104-4397 
*1 05-4407 
*105-4414 

39-1876 

39-1876 

39-1876 

39-1876 

39-1801 

#15-1197 

#15-1197 

#15-1197 

#15-1197 

#15-1197 

#15-1197 

#15-1197 

#15-1197 

#15-1197 

#15-1197 

#15-1197 

#15"! 197 

^58-21 13 

* 61 -2278 
*68-2662 
*69-2707 

77-3317 
*85-3842 
*101-4332 
105-4444 
51-1911 
#15-1197 
40-1882 
#50-1910 
109-4572 
109-4573 
109-4576 
109-4607 
49-1909 
#15-1197 
*10l-4330 
005-4418 
*105-4409 
#15-1197 
#15-1197 
49-1909 
#15-1197 



#V<^-'i^Or') 

#94-4125 

*28-1603 

73-2861 



105-4413 
#105-4501 
*105-4415 
#39-1881 
#39-1878 
#39-1880 
#39-1877 
#39-1876 



15-1197 
29-1617 
*58-2l15 
*61-2?80 
*68-2669 
*71-2788 
*79-3369 
*87-3860 
*102-4348 
105-4455 
#51-1912 
^51-1911 
#50-1910 

#109-4607 
#109-4608 

109-4604 

109-4607 
#50-1910 
*58-?106 

102-4349 
*109-4574 

105-4425 
*58-2106 

#50-1910 
60-2150 



12:24 PAGE 8 
SEQUENCE 156 

CREF vol 



N 12 



105-4431 105-4459 #105-4499 
105-4467 #105-4500 



29-1619 
60-2169 
*62-2298 
68-2676 
*; '-2797 
*81-346^ 
*87-3867 
*102-4355 
*106-4520 



32-1685 
*60-2202 
*68-263S 

*68-2678 

^71-2799 

*83-3566 

*87-3933 

*103-4371 

•106-4525 



*32-1692 

•60-220' 

• 68-^64'. 

*68-2683 

*71-2801 

*83-3577 

*95-4141 

*104-4401 

•107-4538 



•106-4519 •10r'-4537 ^lOH-^bbb 



•32-1699 
•60-2213 
68-2650 
•68-2686 
•75-3190 
•84-3661 
•98-4278 
•105-4406 
•107-4543 



33-1730 
•60-2215 
•68-2652 
•68-2638 
• 76-3,'46 
•84-5672 
•100-4302 
•105-4413 
•108-4:60 



34-1772 
61-22.^0 

v69-270i 
vrrS-3290 
85-3770 
MOO-4309 
•105-n421 
* 109-4568 



•58-2111 
^■61-2273 
•68-2660 
69-2/05 
77-3315 
•85-3776 
•101-4325 
105-4437 
•109-4601 



•51-1911 *51-1911 •51-1911 *51-1911 •Sl-I^ll *58-2106 *58-2106 



#109-4605 
109-4608 

58-2106 
•102-4350 

105-4496 
•58-2106 



109-4605 
1^9-4608 

•58-2106 
•102-4357, 

#105-4' f.8 

58-2ni6 



109-4607 
109-4608 

100-4303 
103-4372 



109-4607 
109-4608 

•100-4304 
003-4373 



109-4607 
109-4608 

*100-4307 
•103-4376 



119-4607 
1C9-4608 

101-4326 
•10:>-4411 



109-4607 



•101-4J27 
105-4418 



61-2226 62-2294 64-2354 65-24?7 66-2500 67-2544 



68-2632 



CKKTRD CREAirD BY 

SYMBOL CROSS REFERENCE 
SYMBOL VALUE 



B 13 



SOPARO 
SO PARI 
SDPAR? 
SI>PAR3 
SDPARA 
SDPAR 5 
S0PAR6 
SDPAR 7 
SDPURO 
SDPDR1 
SDPDR? 
SDPPR^ 
SDP0R4 
ShFl.RS 
SDPDR6 
SOPOR/ 
SIPARO 
SI PARI 
SIPAR,^ 
SIPARS 
SIPAR^ 
SIPARS 
SIPAR6 
StPAR/ 
MPDK'l) 
SlPDRi 
Sl/niR.' 
SIPOR^ 
SIPDR''* 
SlPOR'j 

SIPDR/ 
SRO 



SH 1 
SRi' 



SSP 

SIACK 
SlARi 
SfKl Mr 
SUPlRrt 



1 /?..>60 
1 7?:?6? 

MZZtt 
M?:?7\) 

1 7^^12 
l/^SMO 

, /.-'.-lO'* 
1 A\'06 

I asm; 

1//*>A^ 



^ I//S/6 



KS'S16 
()01U)(> 



ACRO ON 1 


?"JAN-8? AT 


12:24 


PA lit: 9 
















SEOUtNCE 15/ 


















CREF v/01 












RFFL'RFNCf'S 


















69-^69/ 


7^-77?}) 


7\-2777 


7.5-P85? 


74-3008 


75-3186 


76-3242 


77-3299 


/9-33S9 


81--^A6r.; 


85"iS6'5 


8'^"i6S/ 


as -,5/68 


8/-3858 


89-3962 


91-4033 


93-4031 


95-4139 


96-4169 


98-4P40 


IOO-4'^OO 


101-412^; 


102-4346 


103-4369 


104-4392 


106-451/ 


107->':535 


108-4yS^ 


109-4S6/ 


110-^609 














■tflS^.n98 


^/-156U 


*i 04-4395 


*104-44u;:i 












#lS--n9R 


















#15-1193 


















A'15-1198 


















.i^^isviv^a 


AV6-4170 
















#1S-1198 


















#1S-1198 


















#1S-1 198 


















#1S"-1 198 


















^1S-n98 


*/'j-:si8/ 


*/.!)-.3198 














#lS-ri98 


















,»is-nv8 


















,*|S-i pJ8 


*89'-:S966 


*96-41// 


i^98'-4f?4S 












#is-i 198 


















AflS-t 198 


















.^r)-1198 


rV'-1^4;^ 
















,^is-riv8 


d/-lS.S9 


*68-c!66o 


*68-^o8S 


*1Uo-41>21 


'^106-4526 








#IS-1 198 


















#1S-1 198 


















#IS-I 198 


*r,0-?lS4 
















#1S-.1198 


*60-^1SS 


*/9-i36i 














#1S-1 198 


















#1S-| 198 


















# 1 S - 1 1 'J8 


<>/-IS6:' 
















tflS-I 198 


;/-lS41 
















#1S- 1 r^8 


















^1S-1N8 


















■tflS-l 198 


A/S-X199 


*/'.-^,^',^ 














tfl')-! 198 


*6U"(^164 


*M-<:?^3!) 


*8J-:SSb4 


*8!>"3//S 


*b^-3843 


*93-40'^2 


*9o-41/4 




A IS- 1198 


















U 1 ■ 1 1 (1 (1 


















■^ IS -'1198 


















#1^-1 \\i^ 


IS- 1. .'01 


SZ-i-^O^n) 


*S/-.'(^9/ 


6()-.MH< 


61-.S>S''* 


t?~?'^{)(^ 


62-.M09 


^6;^ ,^26 


64-r.^80 


*n4--;v^6 


'■'-.'40^ 


*o4-;'40S 


6^-?4SI 


*6S-.^46/ 


6S-24/4 


*6"i-24/6 


*66-;s.';' 


6/-.^S/l 


O-^'-t'S/'O 


.. -c'S9,J 


*6/-c'60C) 


/0-.'/43 


*/0-;/.S'J 


/1-2/V4 


^/i-2/'90 


80-3A4« 


*80-344? 


8.^-."?S41 


*8^-5343 


83-3649 


*83"3os1 


84-3/46 


*b4-3/48 


HO-38SO 


*8f)-38S.' 


88-S940 


*88-,-594.' 
















*)S-) 198 


1S-1;>0.' 
















^V>-n98 


iS-hHM 


S/-c'091 


60-..M84 


6i-;-:ss 


6.^-?303 


64-2381 


6'«-2A04 


6'-24S,^ 


6.-(^A/"j 


66-.^sr^ 


6/'-^S49 


6/-P5S8 


6/-?S/,> 


6/-2S// 


6,'-2S96 


b/-2tiU/ 


/U-2/4^. 


/'I-r'^yS 


80- "^441 


8;^-3S4? 


8'^>-^/SS0 


84-3/4/ 


36-38S1 


88-3941 






*]s-n98 


1S-1204 
















#r.-K'06 


vS8-;M ]2 


*t)8-J(i/'0 


*68-.*68/ 


/9-fs/O 


^8 ■5-SS69 


83-SS/O 


*83-V>80 


8S-3/au 


*tS'i-^;'8? 


*10''.-4^98 


10'^-44?6 


006-''*''?.^ 


■^1 0,'-''i "k'iO 


*ios-;ss/ 








#1S--M9/ 


1S-l,n 1 


1 ' lilt 


is-un:j 


^8-c!V0o 


1)^-2110 


9S-4142 


9S-41SS 




]/-U'^(6 


Sl-19ri 


^:)8-2106 














#1S-M^/' 


















105-4440 


#11)S-4S0/ 































C 13 








~i 


CKKTBD 
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SEQUENCE 158 












SYHBOL 


CROSS REFERENCE 








CREF vol 












SYMBOL 


VALUE 


RfFERENCES 


















SUPSTK 


w 


000700 


*15-1212 


58-2112 


68-2670 


68-2687 


79-3374 


83-3578 


85-3780 


104-4398 


106-4S22 


SWR 




001U0 


#20-1249 


36-1785 


36-1785 


36-1785 


36-1785 


37-1787 


57-^7^7 


37-1787 


37'US7 








40-1882 


40-1882 


51-1911 


51-1911 


58-2106 


*58-2106 


58-2106 


*58"2106 


*58-2106 








58-2107 


105-4493 


110-4609 














SWRi-G 




000176 


*1 7-1 246 


40-1882 


40-1882 


58-2106 


58-2107 










SUO 


^ 


000001 


^15-1197 


















SWOO 


— 


000001 


#15-1197 


15-1197 
















SUOl 


!:: 


000002 


#15-1197 


15-1197 
















SW02 


tr 


000004 


#15-1197 


15-1197 
















SU05 


w 


000010 


#15-1197 


15-1197 
















SWO^* 


n 


000020 


#15-1197 


15-1197 
















SW05 


— 


000040 


#15-1197 


15-1197 
















SU06 


i: 


000100 


#15-1197 


15-1197 
















SW07 


::; 


OOOPOO 


#15-1197 


15-1197 
















SW08 


r 


000400 


#15-1197 


15-1197 
















SW09 


~ 


001000 


#15-1197 


15-1197 
















SU1 


::; 


000002 


#15-1197 


















SW10 


r: 


002000 


#15-1197 


















sun 


:z 


004000 


#15-1197 


















SUl? 


— 


010000 


#15-1197 


















SWl^ 


r: 


020000 


#15-1197 


















swu 


::: 


040000 


#15-1197 


















SW15 


L-. 


100000 


#15-1197 


















SW2 


Iz 


000004 


#15-1197 


















SW3 


~ 


000010 


#15-1197 


















sw^; 


:.; 


000020 


#15-1197 


















sus 


U 


000040 


#1^-1197 


















SW6 




000100 


#is-ny,^ 


















r,^7 


TZ 


000200 


#15-1197 


















SW8 




000400 


#15-1197 


















SW9 


— 


00^000 


#15-1197 


















TRIT 


l: 


000020 


#15-1208 


29-1617 


29-1622 


30-16^4 












fBITPS 




0012/4 


#20-124*^ 


* 29- 1620 


50-1634 


30-1636 


*30-1637 


*58-2123 








Tfvnv{ 


::; 


0000 K 


#lS-n97 


^58-2106 


*58-2106 














TtbTNO 




0012^4 


#20-1249 


*,V-1787 


54-2003 


54-2004 


54-2005 


54-2006 


54-200/ 


54-2008 


54-2009 








54-2010 


54-2011 


54-2012 


54-2013 


54-2014 


54-2015 


54-2016 


S4-2017 


54-2018 








'14-201'^ 


54-2020 


54-2021 


54-2022 


54-20.-^3 


54-2024 


54-2025 


54-2026 


54-2027 








54-2028 


54-2029 


54-20<0 


54-2051 


54-20^2 










IJMfc><« 




016070 


.*56-2055 


58-2M6 


68-2689 


70-2760 


71-2829 










TJMfLG 




J 6072 


#'>5-2054 


VS6-2065 


*58-2121 














TKVFC 


:j 


000060 


#15~n97 


















TOFF 




0025^)6 


#29-l6V 


68-2653 


7)'277% 


77-3300 












TON 




002412 


#30-lo^^ 


68-2690 


71-2833 














fF^VFl 


~ 


00006^ 


#15-1197 


















THAPPC 




001260 


#20-1249 


*28-1592 


28-1605 


54-2003 


54-2004 


*56-2061 


56-2068 


*57-2087 


57-2096 








*64-2401 


64-2411 


*65-2472 


65-2482 


*80-3458 


80-3446 


*82-3539 


82-3547 


*83-5647 








85-5655 


*84-57'.4 


84-i/52 


*86-3848 


86-3856 


*B8-3938 


88-3946 


*90-4012 


90-4017 








*97-4222 


97-4227 


•99-4286 


99-4291 












TRAPPS 




001262 


#2n-i2;9 


*28-lS'M 


28-1604 


54-2005 


54-2004 


-56-2062 


56-2067 


^57-2088 


57-209S 








*64-2402 


64-2410 


*65-2473 


65-2481 


*80-3439 


80-3445 


*82-3540 


82-3546 


*85-3648 1 








8V^6S4 


*84-V4'i 


8^-3751 


*86'3849 


86-3855 


*88-39i9 


88-5945 


*90-4013 


90-4016 








*97-4225 


97-4226 


*99-4287 


99-4290 













— 
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SEQUEN( 
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SYMBOL 


CROSS REFERENCE 








cnf vol 


















SYMBOL 


VALUE 


REFERENCES 
























TRAPVE 


= 00003A 


#15-119/ 


*58-2106 


*58-2106 




















TRTVEC 


= OOOOK 


#15-1197 
























TST1 


02070^1 


#60-2150 
























TSTIO 


023160 


#68-2632 
























TSTII 


023''; u2 


#69-269/ 
























TST12 


0^3552 


69-2/15 


#/U-2/29 






















T5T13 


0237^2 


#71-2777 
























TSTH 


02^*256 


#73-2852 
























TST13 


025234 


#74-3008 
























Tsn6 


026272 


#/5-3186 
























TST17 


026542 


#/6-324^ 
























TST2 


021222 


#61-2226 
























TST20 


027016 


#77-3299 
























TST21 


027232 


#79-3359 
























TST22 


027634 


79-3435 


#81-3462 






















TST23 


030232 


81-J536 


#83-3563 






















TST2A 


030662 


83-3645 


#84-3657 






















TST25 


031326 


84-3742 


#85-3/68 






















TST26 


031742 


85-3845 


#87-3858 






















TST27 


03235? 


87-3935 


#89-3962 






















TST3 


0.^^1456 


#6?-??94 
























TSTiO 


n^26^6 


89-4005 


#91-4033 






















TST.51 


033042 


91-4072 


#93-4081 






















TST32 


033262 


93-4122 


#95-4139 






















TSf33 


033332 


#96-4169 
























TST3A 


033632 


96-4216 


#98-4240 






















TST.5S 


034104 


98-4280 


#100-4300 






















rsii6 


0341/4 


100-4314 


#101-4323 






















TST57 


034266 


101-4337 


#102-4346 






















rsi^i 


021632 


#64-2354 
























TST^*0 


034360 


10?-4360 


#103-4369 






















7ST41 


034446 


103-438? 


#104-4392 






















T!iT^.2 


035344 


104-4403 


#106-4517 






















rSTAS 


03S420 


#107-4535 
























rsT'iA 


0354/4 


#108-4553 
























ib\h5 


035542 


#109-4567 
























Tsrs 


022126 


#65-2427 
























7sr6 


022406 


#66-2500 
























TST/ 


022566 


#67-2544 
























TYPBN 


^ 104406 


39-1838 


#50-1910 






















TYPDS 


^- 10440S 


39-183? 


41-1894 


#50-1910 


110-4609 


110-4609 
















TYPE 


'-^ 104401 


37-1/87 


37-1/87 


39-1789 


39-1810 


39-1812 


39-1815 


39- 


-181/ 


59' 


■1847 


39- 


-1861 






39-1867 


39-1872 


40-188? 


40-188? 


40-1882 


40-1882 


40- 


■1882 


40- 


■1882 


40- 


-1882 






40-1882 


40-1882 


40-1882 


40-188? 


40-1882 


40-1882 


40- 


■1882 


40- 


■1882 


40- 


■1882 






40-1882 


41-1888 


41-1892 


43-1903 


45-1905 


46-1906 


47^ 


-1907 


#50- 


-1910 


51- 


■1911 






58-2107 


58-2108 


110-4609 


110-4609 


110-4609 
















lYPOC 


•: 104402 


39-1797 


39-1826 


40-1882 


41-1891 


#50-1910 
















TYPON 


104404 


#50-1910 
























[YPOS 


= 104403 


#50-1910 
























UDPARO 


^ 177660 


#15-1198 


27-1566 


*107-4559 


*107-4544 


















OOPA^?! 


^ 17766? 


#15-1198 
























V0PAH2 


= 177664 


#15-1198 
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SYMBOL 


CROSS REFERENCE 








CREF vol 












SYMBOL 


VALUE 


REFERENCES 


















UDPAR3 


tz 


177666 


#15-1198 


















UDPAR4 


— 


177670 


#15-1198 


*98-4241 
















U0PAR5 


— 


177672 


#15-1198 


















UDPAR6 


^ 


177674 


#15-1198 


















UDPAR7 


~ 


177676 


#15-1198 


















UDPDRO 


~ 


177620 


#15-1198 


















UDPDRI 


— 


177622 


#15-1198 


*76-3243 


*76-3254 












■ 


UDPDR? 


:r 


177624 


#15-1198 
















1 


UDPDR3 


— 


177626 


#15-1198 


















UDPDR4 


^ 


177630 


#15-1198 


*89-3967 


*96-4175 


*96-4215 










i 
1 


UDPDR5 


= 


177632 


#15-1198 


















U0PDR6 


^ 


177634 


#15-1198 


















UDPDR7 


~ 


177636 


#15-1198 


















UIPARO 


— 


177640 


#15-1198 


27-1565 


*68-2640 


*68-2659 


•108-4556 


•108-4561 








UIPAR1 


— 


177642 


#15-1198 
















i 


UIPAR2 


~ 


177644 


#15-1198 


















UIPAR3 


rr 


177646 


#15-1198 


*60-2156 


*71-2779 














U I PARA 


r; 


177650 


#15-1198 


*60-2157 


*71-2780 


*81-3464 


•84-3659 








i 


UJPAR5 


~. 


'77652 


#15-1198 


















UIPAR6 


= 


177654 


#15-1198 


















UIPAR7 


— 


177656 


#15-1198 


















UIPDRO 


— 


1 77600 


#15-1198 


27-1545 














1 


UIPDR1 


— 


177602 


#15-1198 


















UIPCR2 


- 


177604 


#15-1198 


















UIPDR3 


— 


177606 


#15-1198 


*71-2781 


*71"2832 


*76-3255 


•76-3289 










UIPDR4 


— 


177610 


#15-1198 
*96-4176 


*60-2165 


*6l-2236 


*71-2782 


•84-3658 


•87-3866 


•87-3934 


•89-3968 


•93-4083 


UIPDR5 


— 


177612 


#15-1198 


















UIPDR6 


r: 


177614 


#15-1198 


















UIPDR7 




177616 


#15-1198 


















USFSTK 


— 


000600 


#15-1213 
108-4557 


58-2114 


68-2644 


68-2661 


71-2800 


81-3476 


84-3673 


87-3870 


107-4540 


USP 


*- 


X000006 


#15-1207 

*84-3675 


*58-2114 
37-5370 


*68-2644 
*87-3872 


*68-2661 


•71-2789 


•71-2800 


81-3471 


*84«3664 


84-3665 


ViHU 




001276 


#20-1249 


















UASR6 




0012S6 


#20-1249 


54-2003 


54-2004 


*56-2065 


•57-2089 










WASSRO 




001264 


#20-1249 


*28-1594 


28-1597 


54-2004 


54-2006 


54-2008 


54-2010 


54-2013 


S4-2014 1 








54-2016 


54-2017 


54-2021 


54-2023 


^4-2026 


•57-2090 


•60-2183 


60-2185 


•61-2254 








61-2256 


*62-2309 


*64-2380 


64-2385 


•64-2403 


•65-2451 


65-2454 


•65-2474 


•67-2576 








67-2578 


*67-2592 


67-2593 


*70-2743 


70-2746 


•71-2794 


71-2813 


•80-3440 


•82-3541 








*83-3649 


*84-3746 


*86-3850 


*88-3940 


•90-4008 


•97-4219 


•99-428^ 






UASSR1 




001266 


#20-1249 


*28-1S9S 


54-2023 


54-2026 


•90-4009 


•97-4220 


•99-4:64 






WASSR2 




001270 


#20-1249 


*28-1596 


54-2004 


54-2007 


54-2008 


54-2011 


54-2012 


54-2013 


54-2014 








54-2016 


54-2017 


54-2023 


54-2026 


•57-2091 


•60-2184 


60-2192 


•61-2255 


61-2263 








•62-2303 


62-2312 


62-2314 


•64-2381 


64-2390 


•64-240^ 


•65-2452 


65-2461 


•65-2475 1 








•66-2515 


66-2516 


*67-2549 


67-2551 


•67-2558 


67-2560 


•67-2577 


67-2581 


^67-2596 








67-2597 


*67-2607 


67-2609 


*70-2744 


70-2750 


•71-2795 


71-2816 


•80-3441 


•82-3542 








♦83-3650 


*84-3747 


*86-3851 


•88-3941 


•90-4010 


•97-4221 


•99-4285 






WASSR3 




001272 


#20-1249 


*90-4011 














i 


W8IT 


— 


000100 


#15-1209 


















$APTHD 




000204 


19-1248 


#19-1248 
















5ASTAT 


= 


****** 


44-1904 


44-1904 
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SEUUENCE 161 












SYMBOL 


CROSS REFERENCE 








CREF vol 












SY^OL 


VALUE 


REFtttENCES 


















SATYC 


0060P2 


44-1904 


#44-1904 
















SATYl 


00S776 


//44-1904 


















$ATY3 


00600A 


43-1903 


#4A-1904 
















$ATY4 


0060U 


37-1787 


#44-1904 
















SAUTOB 


001 13A 


#20-1249 


40-1882 


40-1882 


40-1882 


*58-2107 










S^HAriR 


out v,^ 




















1>HIJI)M 1 


v>.» 1 < (_>_■ 


*?0-1249 


















$8ELL 


OOlklA 


ft('.\)-xJ,': 


37-1787 


38-1787 


38-1787 












$81N 


006316 


*4b-1905 


«hD-i /il 


45-1905 


#45-190, 












SCHARC 


005772 


*43-1903 


*43-1903 


43-1903 


*43-1903 


#43-1903 










$C<3U?^ 


004306 


J*^40-1882 


50-19i0 


50-1910 














$CLR.T 


0362Ai? 


110-4609 


#110-4609 
















SCMTAG 


001 too 


#20" 1249 


58-2106 


58-2106 


58-2106 


58-2106 


58-2106 


58-2106 






$CM1 


= 000006 


#20-1249 


20-1249 


20-1249 


#20-1249 


20-1249 


20-1249 


#20-1249 


20-1249 


20-12'.9 






#20-1249 


20-1249 


20-1249 


#20-1249 


20-1249 


20-1249 


#20-1249 


20-1 2/*9 


20"1249 






#20-1249 


















$CM? 


= OOOOU 


#20-1249 


20-1249 


20-1249 


#20-1249 


20-1249 


20-1249 


#20-1249 


20-1249 


20-1249 






#20-1249 


20-1249 


20-1249 


#20-1249 


20-1249 


20-1249 


#20-1249 


20-1249 


20-1249 






#20-1249 


















$tM3 


^ 000006 


#20-1249 


20-1249 


20-1249 














$CMA 


=: U0U006 


#20-1249 


20-1249 


20-1249 


#20-1249 


20-1249 


20-1249 


#20-1249 


20-1249 


20-1249 






#20-1249 


20-1249 


20-1249 


#20-1249 


20-1249 


20-1249 


#20-1249 


20-1249 


20-1249 






#20-1249 


















$CNTIC 


001312 


#20-1249 


40-1882 


40-1882 


40-1882 


40-1882 










SCNTLG 


005253 


40-1882 


#40-1882 
















SCNTLU 


005246 


40-1882 


40-1882 


#40-1882 














SCPUOP 


001252 


#20-1249 


















SCRt F 


001221 


#20-12^9 


37-1787 


38-1787 


38-178/ 


39-1789 


39-1812 


39-1817 


39-1872 


40-1882 






40-1 8H? 


40-1882 


40-1882 


43-1903 


45-1903 


43-1903 


110-4609 






SDBLK 


006762 


47-1907 


47-1 v07 


#47-190^ 














$Dn?n 


007066 


39-1844 


39-1858 


#49-1909 














SDLVCT 


001234 


#20-1249 


















SDOAGN 


0^6262 


110-4609 


110-4609 


110-4609 


#110-4ft09 












5DTBL 


006752 


47-1907 


#47-190/ 
















SfNDAP 


0362S2 


18-1247 


37-1787 


58-2107 


#110-4609 












$FNDCT 


0360S4 


58-2106 


#110-4609 
















$ENULL 


03o324 


#110-4609 


















$FNV 


U)1244 


#20-1249 


:^7-1787 


43-1903 


44-1904 


44-1904 


58-21 07 








StNVM 


0012A5 


#20-1249 


43-1903 


43-1903 


44-1904 


58-2106 










$EOP 


056024 


41-1896 


109-**602 


#1 10-4609 














StOPCT 


036046 


*58-2106 


#110-4609 


110-4609 














$ERFLG 


001103 


#20-1249 
38-1787 


36-1785 


*36-1785 


36-1785 


*36-1785 


36-1785 


36-1785 


*37-1787 


38-1787 


SERHAX 


001115 


#20-1249 


*36-1785 


36-1785 


36-1785 


*58-2106 










SERROR 


003270 


#37-1787 


58-2106 
















tERRPC 


001116 


#20-1249 


*37-1787 


*57-}7^7 


37-1787 


38-1787 


38-1787 


39-1795 


39-1880 


54-2005 






54-2004 


54-2005 


54-2006 


54-2007 


54-2008 


54-2009 


54-2010 


54-2011 


54-2012 






5^-2013 


54-2014 


54-2015 


54-2016 


54-2017 


54-2018 


54-2019 


54-2020 


54-2021 






54-2022 


5A--2024 


54-2025 


54-2026 


54-2027 


54-2028 


54-2029 


54-2030 


54-2031 






54-2032 


















SE'^RTB 


001320 


#21-1249 


39-1807 
















SERTTL 


001112 


#20-1249 


*i7-1787 


38-1787 


38-1787 


110-4609 


110-4609 


110-46O9 


*110-4609 
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SYMBOL 
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CREF vol 












SYMBOL 


VALUE 


REFERENCES 


















SESCAP 


001212 


#20-1249 


*36-1785 


37-1 7«7 


37-1787 


38-1787 


38-1787 


*58-2l06 






tETABL 


001 244 


#20-12^9 


















SETEND 


001254 


19-1248 


#20-12^^9 
















SFATAL 


001226 


#20-1249 


^44-1904 
















SFFLG 


006242 


*44-1904 


*44-1904 


44-1904 


*44-1904 


#44-1904 










$FILLC 


001156 


#20-1249 


43-iy03 


43-1903 


43-1903 












UILLS 


0011 "^iS 


#20-1249 
#2'>12'h9 
^^u-i249 


43-1903 


43-1903 














SCiDDAT 


Out l<^H 


















$GET42 


036224 


110-4609 


110-4609 


#110-4609 














SGTSWR 


004356 


#40-1882 


50-1910 


50-1910 














Sf'D 


= 000000 


15-1195 


1^-1195 


15-1195 














SHiers 


000204 


#19-1248 


















SICNT 


001104 


#20-1249 


















SILLUP 


007452 


51-1911 


51-1911 


#51-1911 














tINTAG 


001135 


#20 1249 


40-1832 


40-1882 


40-1882 


40-1882 










SITPM8 


001114 


#20-1249 


*3/-1787 


37-1787 


37-1787 


*37-1787 


37-1787 


38-1 ^87 


38-1 787 


39-1792 


tLF 


001222 


#20-1249 


38-1787 


38-1787 


40-1382 


40-1882 


40-1882 


43-1903 


43-1903 




$LFLG 


006241 


*44-iy04 


#44-1904 
















SLOOP 


036^20 


110-4609 


#110-4609 
















%[ PADR 


001106 


#20-1249 


^36-1785 


*36-1785 


36-1735 


36-1785 


36-1785 


*58-2106 






SLPERR 


001110 


#20-1249 


36-1785 


*36-1785 


36-1785 


56-1785 


37-1787 


*58-2106 


*o0-2166 


*6i-2237 






■•62-2295 


*64-2361 


*64-2365 


*64-2371 


*65-2432 


+65-c'A36 


*65-2A^^ 


*66-?508 


*67-2548 






^67-2557 


*n/-2566 


*68-2634 


*69-2699 


*70-2735 


^71-2787 


* 73-2862 


* 73-2886 


» 73-2895 






*73-2909 


*/ 3-^920 


* 73-2931 


*73-29A0 


*73-2950 


*73-2960 


*73-2971 


*/ 3-2980 


*73-2989 






*74-3022 


*74"3036 


*74-3047 


^74-3086 


^74-3098 


*74-3107 


*74-312'; 


*74-3134 


*74-3148 






*74-3158 


*/'';-3l68 


^75-3188 


*75-3202 


*75-3209 


*75-3218 


*75"3227 


'^76-3244 


*76-3258 






* 76-3265 


*7n-327A 


*7o-:>282 


H 77-3 501 


*79-3368 


^^79-3384 


*81-3468 


*81-3485 


*8.j-3b85 






*.H4-36^y 


*y>-3/6V 


*8:>-3792 


*87-3859 


*87-3883 


*y9-3974 


*91-4036 


*93-4086 


*96-4163 






+98-4248 


*105--4412 
















$MAil 


001224 


19-1248 


19-1248 


#20-1249 


36-1785 


37-1787 


43-1903 


58-21U6 


58-2107 




$MfMDR 


000206 


#19-1248 


















SMM G 


C06t'40 


*44-1904 


44-1904 


*44-1904 


#44-1904 












SMNEW 


005271 


40-1882 


#40-1882 
















SMSGAD 


001240 




*44-1904 


<'*4-1904 














SMSGLG 


001242 


#20-1249 


♦44-1904 
















SMiiGtV 


001224 


#20-1249 


44-1904 


H4-1904 


44-1904 


*44-1904 










$.»1SWH 


0US260 


40-188:: 


#40-1882 
















JMXCNI 


00M06 


#20-1249 


















tNLH I 


0011^4 


#20-1249 


43-1903 


43-1903 


43-1903 












SNWTST 


" 000001 


#59-2150 


59-2150 


#60-2150 


60-2150 


#60-2226 


60-2226 


#61-2226 


61-2226 


#61-2294 






61-2294 


#62-22^4 


62-2294 


#63-2354 


63-2354 


#64-2354 


64-2354 


#64-2427 


64-2427 






#65-2427 


65-^^27 


#65-2500 


65-2500 


#66-2500 


66-2500 


#66-2544 


66-2544 


#67-2544 






6/-2544 


#67-2632 


67-2632 


#68-2632 


68-2632 


#68-2697 


68-2697 


#69-2697 


69-2697 






#69-2729 


69-2729 


#70-2729 


70-2729 


ff70'2777 


70-2777 


M7]-2777 


7\'2777 


#72-2852 






/P-^S'i^ 


#73-2852 


73-2852 


#73-3008 


73-3008 


#74-3008 


74-3008 


#74-3186 


74-3186 






#75-3186 


75-3186 


#75-3242 


75-3242 


#76-3242 


76-3242 


#76-3299 


76-3299 


#77-3299 






/■/'-3<^99 


#7H-3^SV 


78"3^S9 


#79-3359 


79-3359 


#80-3462 


80-3462 


#81-3462 


81-3462 






#8^-3563 


82-3563 


#83-3563 


83-3563 


#83-3657 


85-3657 


#84-3657 


84-3657 


#84-3^68 






84-3/68 


#85-3768 


85-3768 


#86-3858 


86-5858 


#87-3858 


87-3858 


#88-3962 


88-3962 






#89-3^62 


89-^962 


#^0-4033 


90-4033 


#91-4033 


91-4033 


#92-4081 


92-4081 


#93-4081 






93-4081 


#94-4139 


94-4139 


#95-4159 


95-4139 


#95-4169 


95-4169 


#96-4169 


96-4169 















H 13 




.-.—.. — .. — 


-- 


.._, . 


CKKTmD 


CREATED BY 


rtACRO UN 1 


2-JAN-82 AT 


12:24 

SEQUENC 


PAGE 15 
E 163 












SYMROL 


IROSS REFERENCE: 








CREF V01 












SYMBOL 


VALUE 


REFERENCES 






















#97-4240 


97-4240 


#98-4240 


^98-4240 


#99-4300 


99-4300 


#100-4300 


100-4300 


#100-4323 






100-432:^; 


#101-4323 


101-4323 


#1 ul -4_;*i6 


101-4346 


#102-4 34(^^ 


102-4346 


#102-4369 


102-4369 






#103-4369 


103-4369 


#103-4392 


103-4392 


#104-4392 


104-4392 


#105-4517 


105-4517 


#106-4517 






106-4517 


#106-4535 


1C6-<535 


#107-4535 


107-4535 


#107-4553 


107-4553 


#108-4553 


108-4553 






#108-4567 


108-4567 


#109-4567 


109-4567 












$OCNT 


006542 


*46-19G6 


•46-1906 


#46-1906 














SOCTVL 


007170 


49-1909 


#49-1909 
















$OMUDfc 


006S44 


*46-1906 


*46-1906 


46-190n 


H6-1906 


*46-1906 


#46-1906 








$IMH 


Ou:^?S2 


36-1 7MS 


36-1 78S 


36-1785 


#36-1 /8^ 












SHASb 


001232 


#20-1249 


41-1886 


*58-2106 


*1 10-4609 


*1 10-4609 


110-4609 


110-4609 


110-4609 


110-4609 


SPASIW 


000212 


#19-1248 


















SPURAD 


007A'S4 


#S1-1911 


















$PU«DN 


007274 


#51-1911 


51-1911 


58-2106 














$PURf1G 


007430 


#51-1911 


















SPURuP 


007346 


51-1911 


#5^-1911 
















JQUES 


001220 


#20-1249 


38-1787 


38-1787 


40-1882 


40-1882 


40-1882 


40-1882 


43-1903 


43-1903 


SRDCHR 


004630 


#40-1882 


50-1910 


50-1910 














IRDDEC 


z: ******* 


50-1910 


















SJmi.IN 


004760 


#40-1882 


50-1910 


50-1910 














J^DnCT 


= ^^1,^1,^, 


50-1910 


















tRDSZ 


- 000010 


#40-1882 


40-1882 
















$REGAO 


001160 


#20-1249 


















iRfGO 


001162 


#20-1249 

54-2025 


*37-1787 
54-20^8 


54-2008 
:i4-203I 


54-2009 


54-2010 


54-2011 


54-2016 


54-2022 


54-2024 


$HEG1 


001164 


.f 20-1 249 

54- ; 025 

#^s=.: ^^9 


*37-1787 


54-2012 


54-2015 


54-2016 


54-2017 


54-2020 


54-2021 


54-2024 


sreg;' 


001166 


*3/-1787 


54-2005 


54-2006 


54-2007 


54-2010 


54-2015 


54-2020 


54-2025 


$REG5 


001170 


.^20-1249 


*37-1787 


54-2006 


54-2011 


54-2017 


54-2020 


54-2027 






$REG4 


001 172 


.;20'124V 


* ^7-1/8/ 


54-2007 


54-2008 


54-2009 


54-2010 


54-2011 






$Rb'G5 


001174 


.r;:0-1249 


*37-1787 
















$Rt.SRt 


U07030 


#My-i^^08 


50-1910 
















SRTNAD 


036322 


#110 4609 


















SRTRN 


0363 i 6 


5:^-2106 


•58-2106 


*58-2106 


110-4609 


#110-4609 










SR2A 


- *♦**»* 


■ C-lVIO 


















SSAVRE 


006/72 


tH^'-'(908 


50-1910 


50-1910 














j;SAVR6 


007456 


*':t-1911 


51-1911 


•51-1911 


•51-1911 


#51-1911 










tscorc 


00:042 


#J6-1785 


58-2106 
















SShTUH 


- 0UUi37 


<:?i6--i24s 


16-124S 


#16-1245 


16-1245 


#16-1245 


I6-124S 


#16-1245 


16-1245 


#16-1245 






16-1245 


#16-1245 


16-1245 


#16-1245 


36-1785 


'-1787 


37-1787 


37-1787 


37-178;* 






40-188? 


40-1882 


51-1911 


58-2106 


58-2106 


58-2106 


58-2106 


58-2106 


58-2106 






5':-2106 


58-2106 


58-2106 


"^8-21 06 


58-2106 


58-2106 


58-2107 


58-2107 


58-2107 






1j0-4609 


110-4609 
















$STUP 


= )77777 


#1g-1245 


.;/.-1245 


16-1245 


*16-1245 


#16-1245 


16-1245 


#16-1245 


#16-1245 


16-1245 






#16-12'*'' 


^''- ^-1245 


16-1245 


#16-1245 


#16-1245 


16-1245 


#16-1245 


#16-1245 


16-1245 


$SVLAD 


003216 


36-1785 


:)6-1785 


#36-1785 














JSVPC 


r 000204 


#10-1247 


.c-1247 
















$SWR 


= 173400 


#1S-1183 


15-1195 


15-1196 


1*^-1196 


15-1196 


15-1196 


15-1196 


15-1196 


15-1196 






'.5-1196 


20-1249 


20-1249 


20-1249 


36-1785 


36-1785 


36-1785 


36-1785 


36-1785 






36-1785 


36-1785 


36-1785 


36-1785 


36-1785 


36 1785 


36-1785 


36-1785 


36-1785 






36-17.35 


36-1785 


36-1785 


36-1785 


36-1785 


36-1785 


37-1787 


37-1787 


37-1787 






3/-17!W' 


37-1787 


37-1787 


37-1787 


37-1787 


37-1787 


38-1787 


38-1787 


51-1911 






58-2106 


58-2106 


58-2106 


58-2106 


58-2100 


60-2150 


61-2226 


62-2294 


64-2354 



CKKTBD 


CREATED BY 


MACRO ON 12-JAN-82 AT 


12:24 


PAGE 16 


I 13 


















SEQUENCE 164 












SYMBOL 


CROSS REFERENCE 








CREF vol 












SYMBOL 


VALUE 


REFERENCES 






















65-2427 


66-2500 


67-2544 


68-2632 


69-2697 


70-2729 


1\-2171 


73-2852 


74-3008 






75-3186 


76-3242 


77-3299 


79-3359 


81-3462 


83-3563 


84-3657 


85-3768 


87-3858 






89-3962 


91-4053 


93-4081 


95-4139 


96-4169 


98-4240 


100-4300 


101-4323 


102-4346 






103-4369 


104-4392 


106-4517 


107-4535 


108-4553 


109-4567 


110-460Q 


110-4609 


110-4609 






110-4609 


110-460y 
















S5WREG 


001246 


#20-1249 


58-2106 
















SSWRMK 


= 000000 


15-1196 


15-1196 


15-11^6 


15-1196 


15-1196 


15-1196 


15-1 :^6 


15-1196 


15-1196 






36-1785 


36-1785 


36-178'?* 


36-1785 


36-1785 


36-1785 


36-1 /85 


36-1785 


36-1785 






36-1 78S 


















STBIT 


001510 


#20-1 2s;; 


*51-1911 


*58-2106 


*1 10-4609 


110-4609 


110-4609 








tTFSTN 


001230 


#20-1249 


A36-1785 


39-1880 














tTKB 


001146 


#20-1249 
43-1905 


40-188? 

43-1903 


40-1882 


40-1882 


40-1882 


40-1882 


40 1882 


43-1903 


43-1903 


$TKS 


001144 


#20-1249 

45-1903 


40-1882 
43-1903 


40-1882 

43-1903 


40-1882 
43-1903 


40-1882 


40-1882 


40-1882 


40-1882 


40-1882 


STMPO 


001176 


#20-1249 


•32-1681 


32-1693 


32-1700 


54-2005 


54-2006 


54-2007 


54-2013 


54-2018 






54-20.^9 


54-2031 


54-2032 


*60-2169 


60-2199 


60-2204 


*61-2240 


61-2270 


61-2275 






*67-2571 


67-2578 


*71-2802 


*71-2808 


*71-2812 


*71-2815 


*71-2819 


71-2820 


*105-4483 






^109-4582 


















STMP1 


001200 


#20-1249 


*32-1682 


32-1694 


32-1 7u1 


54-2032 


*67-2568 


*67-2580 


*67-2583 


67-2584 






*67-2590 


*67-2595 


*67-2599 


67-2600 


*70-2742 


*70-2748 


*70-2752 


70-2753 


* 109-4578 






109-4585 


















$TMP2 


001202 


#20-1249 


54-2013 


*67-2572 


67-2581 


*79-^414 


79-3415 


*79-3428 


79-3429 


*81-3515 






81-3516 


*81-3529 


81-3530 


83-3620 


*83-:5621 


83-3625 


*83-3638 


83-3639 


85-3642 






84-3716 


*84-3717 


84-3721 


*84-3734 


84-3736 


84-3739 


*85-3822 


85-3823 


*85-3836 






85-3837 


♦87-3913 


87-3914 


*87-3927 


87-3928 


O09-4590 








$TMP3 


00 1 204 


#^0-1249 
*109-4587 


*i00-4303 
109-4594 


100-4307 


*101-4326 


101-4330 


*102-4349 


102-4353 


*1 03-4372 


103-4576 


STMP4 


001206 


#20-1249 


*3v-1855 


S9-1857 


* 109-4588 


109-4593 










$TMP5 


001210 


#20-1249 


*39-1856 


H1-1886 


*41-1887 


41-1893 


*109-4589 


109-4S92 






$TN 


= 000046 


#15-1184 


15-1195 


59-2150 


60-2150 


#60-2150 


60-2226 


61-2226 


#61-2226 


61-2294 






62-2294 


#62-2294 


6^-2354 


64-235^ 


#64-2354 


64-2427 


65-2427 


#65-2427 


65-2500 






66-2500 


#66-2500 


66-2544 


67-2544 


#67-2544 


67-2632 


68-2632 


#68-2632 


63-2697 






69-2697 


#69-2697 


69-2715 


69-2729 


70-2729 


#70-2729 


70-2777 


7^-7777 


M7y'2777 






72-2852 


73-2852 


#73-2852 


73-3008 


74-3008 


#74-3008 


74-3186 


75-3186 


#75-3186 






75-3242 


76-3242 


#76-3242 


76-3290 


77-3299 


#77-3299 


78-3359 


79-3359 


#79-3559 






79-3435 


80-3462 


81-3462 


#81-3462 


81-3536 


82-3563 


83-3563 


#83-3563 


85-3645 






83-3657 


84-3657 


#84-3657 


84-3742 


84-3768 


85-3768 


#85-3768 


85-3845 


86-3858 






87-3858 


#87-3858 


87-3935 


88-3962 


89-3962 


#89-3962 


89-4005 


90-4033 


91-'^035 






#91-A0^5 


91-4072 


92-4081 


93-4081 


#93-4081 


93-4122 


94-4139 


95-4139 


#95-4139 






95-4169 


96-4169 


#96-4169 


96-4216 


97-4240 


98-4240 


#98-4240 


98-4280 


99-4300 






100-4300 


#100-4300 


100-4314 


100-4323 


101-4323 


#101-4323 


101-4337 


101-434O 


102-4346 






#102-4346 


102-4360 


102-4369 


103-4369 


#103-4369 


103-4382 


103-4392 


10^-^:>9c 


#104-4592 






105-4517 


106-4517 


#106-4517 


106-4535 


107-4535 


#107-4535 


107-4553 


108-4553 


#108-4553 






108-4567 


109-4567 


#109-4567 














JTP8 


001152 


^:0-1249 


43-1903 


43-1903 


43-1903 












tfPMG 


0011S7 


#-^J-1249 


43-190^ 


4^-1^03 


43-1903 












tiPS 


0011';.; 


#20-1249 


43-1903 


43-1903 


43-1903 












STRAP 


007206 


#50-1910 


58-21^'* 
















$rRAPi? 


00/230 


#50-1910 


50-1 J 
















tTRP 


= 000015 


#50-1910 


50-1910 


50-1910 


50-1910 


50-1910 


#50-1910 


50-1910 


50-1910 


50-1910 






50-1910 


#50-1910 


50-1910 


50-1910 


50-1910 


50-1910 


#50-1910 


50-1910 


50-1910 



CKKTBD 


CREATED BY 


MACRO ON 12-JAN-82 AT 


12:24 


PAGE 17 


J 13 


















SEQUENCE 165 












SYMBOL 


CROSS REFERENCE 








CREF vol 












SYMBOL 


VALUE 


REFERENCES 






















50-1910 


50-1910 


#50-1910 


50-1910 


50-1910 


50-1910 


50-1910 


#50-1910 


50-1910 






50-1910 


50-1910 


50-1910 


#50-1910 


50-1910 


50-1910 


50-1910 


50-1910 


#50-1910 






50-1910 


50-1910 


50-1910 


50-1910 


#50-1910 


50-1910 


50-1910 


50-1910 


50-1910 






/r50-1910 


50-1910 


50-1910 


50-1910 


50-1910 


#50-1910 


50-1910 


50-1910 


50-1910 






50-1910 


#50-1910 


50-1910 


50-1910 


50-1910 


50-1910 


#50-1910 






STRPAt) 


007242 


50-1910 


#50-1910 
















STSTM 


000210 


J!n9-1248 


















$TSTNM 


001102 


#20-1249 

37-1787 


36-1785 

38-1787 


36-1785 
38-1787 


*56-17o5 
41-1889 


36-1785 
*n0-4609 


36-1785 


36-1785 


36-1785 


57-1787 


ITIYIN 


005236 


40-1882 


40-1882 


40-1882 


40-1882 


40-1882 


#40-1882 








$TYPBN 


006244 


#45-1905 


50-1910 


50-1910 














tTYPDG 


nnAS4^ 


#47-1907 


50-1910 


50-1910 














STYPE 


005432 


#43-1903 


44-1904 


50-1910 


50-1910 












STYPEC 


005644 


40-1882 


43-1903 


43-1903 


43-1903 


#43-1903 










STYPEX 


005774 


43-1903 


43-1903 


43-1903 


#43-1903 












STYPOC 


006344 


#46-1906 


50-1910 


50-1910 














SfYPON 


006^60 


46-1906 


#46-1906 


50-1910 














$TYPO.S 


006520 


#46-1906 


50-1910 
















SUN IT 


001236 


#20-1249 


















tUNITM 


000214 


#19-1248 


















$USWR 


0012!)0 


#20-1249 


















SXOFF 


-~ 000023 


43-1903 


43-1903 
















$XON 


= 000021 


40-1H82 


43-1903 


43-1903 


43-1903 












SXTSTR 


005054 


#36-1785 


















ISGETA 


= 000001 


#110-4609 


#110-4609 


110-4609 














tOFILL 


006543 


*46-1906 


*46-1906 


46-1906 


#46-1906 












$40CAT 


- ****** 


36-1785 


3/-1 787 
















.lASTA 


= ****** 


44-1904 


44-1904 
















.$X 


= 000204 


#19-124S 


19-1 24a 
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SEQUENCE 166 

MACRO CROSS REFERENCE CREF VOl 

MACRO NAME REFERENCES 

COMMEN #15-1197 

ENDCOM #15-1197 

ESCAPE #15-1197 

GETPRI #15-1197 110-A609 

GETSWR #15-1197 #58-2107 58-2107 

MES350 #99-A293 100-A300 

MFS^SI #100-4316 #101-4.^23 

Hrs3S2 #101-4339 102-4546 

MES353 #102-4362 #103-4369 

MES554 #103-4384 #104-4392 

MES355 #105-4509 106-4517 

MFS356 #106-4527 #107-4535 

MES357 #107-4545 #108-4553 #108-4562 #109-4567 

MSG30 #S9-2U2 60-2150 

MSG3I #60-2218 #61-2226 

MSG31A #61-2283 62-2294 

MSG32 #63-2343 #64-2354 

MSG33 #64-2416 65-2427 

MSG34 #65-2487 66-2500 

MSG35 #66-2531 #67-25V» 

MSG36 #67-2619 63-2632 

MSG36A #68-2691 69-2697 

MSG37 #69-2718 #70-2729 

MSG4U #70-2763 #71-277/ 

MSG40A A76-3291 #77-3299 

MSC40B #72-2837 73-2852 

MSG40C #73-2998 #74-3008 

MSG40D #74-3178 #75-3186 

MSG40E #75-3234 76-3242 

MSG41 #78-3345 #79-3359 

MSG41A #80-3448 81-3462 

MSG42 #82-3549 #83-3563 #84-3657 

MSG43 #84-3754 #85-3768 #87-3858 

MSG43A #88-3948 89-3962 

HSG44 #90-4019 #91-4033 #93-4081 

MSG45 #94-4131 95-4139 

MSG46 #95-4156 #96-4169 

MSG47 #97-4229 98-4240 

MULT #15-1197 

NEWTST #15-1178 #15-1197 #59-2150 #60-2226 #61-2294 #63-2554 #6''. -2427 #65-2500 #66-2544 #l^-2632 

#68-2697 #69-2729 070-2777 #72-2852 #73-3008 #74-3186 #75-3242 #76-3299 #78-3359 #8^-3462 

#82-3563 #83-3657 #84-3760 #86-3858 #88-3962 #90-40-'3 #92-4081 #94-4139 #95-^169 #9V -4240 

#99-^300 #100-4523 #101-43^6 #10^-4369 #103-4i92 #105-hj17 #106-',535 #107-4553 #108-4567 

"'^^ ^is-iig/ #44-1904 #44-1^04 #47-1907 #48-1908 //51-1911 #51-1911 

P":^H A-iv I ,'v-' u^-V^:i' 44-1904 4^>-1904 47-1907 48-1908 51-1911 51-1911 

SAVR #tj-Ii66 05/-^7B7 

SEIPRI #15-1197 

SETTRA #50-1910 50-1910 50-1910 50-1910 50-1910 50-1910 50-1910 SU-1910 50-1910 50-1910 

50-1910 50-1910 50-1910 

SETUP #15-1197 58-2106 

^'KIP #15-1197 69-2715 79-3435 81-3536 83-3645 84-3742 85-3845 87-3935 89-400S 91-4072 



I ^^K 
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CIsnToD 


CREATED BY MACRO ON 12-JAN-82 AT 12 


:24 PAGE 19 




















SnQUEMCb 


^67 












MACRO CROSS 


:EFERtNCE 






CRE 


." vol 












MACRO NAME 


REFERENCES 






















9i-A122 


96-4216 


98-4280 


100-4314 


101-4337 


102-4360 


103-4382 








SLASH 


:¥15"1197 




















SPACh 


#15-1163 


#15-1197 


















STARS 


j^15-1197 


18-124/ 


19-1248 


19-1248 


19-1248 


20-1249 


20-1249 


20-1249 


27-1526 


2/-1531 




28--'S69 


28-1580 


29-1609 


29-1616 


30-1627 


30-1633 


31-1642 


31-1655 


52-1660 


32-1675 




:V^-1706 


33-1721 


34-1749 


34-1/64 


36-1785 


37-1787 


40-1882 


40-1882 


40-1882 


/.0-1882 




A3-1903 


04-1904 


45-1905 


46-1906 


47-1907 


48-1908 


49-1909 


50-1910 


51-1911 


51 '1911 




56-20^5 


56-2052 


57-2071 


57-2078 


59-2130 


59-2140 


60-2150 


60-2150 


61-2226 


61-2226 




62-2294 


62-2294 


63-2327 


63-2342 


64-2354 


64-2354 


65-2427 


65-2427 


66-2500 


66-2500 




67-2.SAA 


67-2544 


68-2632 


68-2632 


69-2697 


69-2697 


70-2729 


70-2729 


7^-2777 


71-2777 




73-:^8S2 


73-2852 


74-3008 


74-3008 


75-3186 


75-5186 


>6-3242 


76-3242 


77-3299 


77-3299 




78-.^3:;a 


78-3343 


79-3359 


79-3359 


81-3462 


81-3462 


83-3563 


83-3563 


84-3657 


84-3657 




S5-'5763 


85-3768 


87-3558 


37-3858 


39-3962 


8^1-3962 


91-4033 


91-4033 


93-4031 


93-t08i 




95-^139 


95-4139 


96-4169 


96-4169 


98-4240 


98-4240 


100-4300 


100-4300 


100-4300 


100-;300 




101"''i323 


10 1-4323 


101-4323 


101-4323 


102-4346 


102-4346 


102-4346 


102^4346 


103-4369 


105-4369 




103-4369 


103-4369 


104-4392 


104-4392 


104-4392 


10^1-4392 


1C5-4517 


106-4517 


106'-4517 


106-4517 




107-45?'^ 


107-4535 


107-4535 


107-4535 


108-4553 


108-4553 


108-4553 


108-4553 


109-456/ 


109-4567 




110-4609 




















SURSU 


*1,^-n97 


#58-2106 


#55-2106 
















IRMTRP 


#50-1910 




















TYPBIN 


#15-1197 




















TYPDEC 


#15-1197 


110-4609 


110-4609 
















TVrNAM 


#15-1197 


#58-2107 


















TYPNUH 


#15-1197 




















TYPOCS 


#15-1197 




















TYPOCT 


#15-119/' 


40-1882 


















TYPTXT 


#15-119^ 


53-2108 


110-4609 


110-4609 














user: 


#15-1223 


20-1249 


















$$CMRt 


#19-124^' 


20-1249 


20-1249 


20-1249 


20-1249 


20-1249 


20-1249 








$$CMTM 


#19-1249 


20-1249 


20-1249 


20-1249 


20-124'^ 


20-1249 


20-1249 








ttLSLA 


#15-119/ 




















$$NEWT 


#15-1178 


#15 119/ 


#59-2150 


#60-22r'6 


#61-2294 


#6.3-2354 


#64-2427 


#65-2500 


#66-2544 


#67-2632 




#68-2697 


#69-2/29 


#70-27// 


#72-2852 


#73-3008 


#74-3186 


#75-3242 


#76-3?99 


#78-3359 


#80-3462 




#82-35)3 


#83-3657 


#84-3768 


#86-3858 


#88-3962 


#90-4033 


#9^-4081 


#94-4139 


#95-4169 


#97-4240 




#99-4300 


#100-4323 


#101-4346 


#107-4369 


#10';-4392 


#105-451/ 


#106-4535 


^107-4555 


#108-4567 




$$SET 


#50-1910 
#50-1910 


#50-1910 
#50-1910 


#50-1910 
#b0-1910 


#50-1910 


#50-1910 


#50-1 ^10 


#50-1910 


#50-1910 


#50-1910 


#50-1910 


SSSf.TM 


#58-2106 


5G-21C6 


















$1.S^^r'l 


#58-2106 


58-2^06 


















$$SKIP 


#15-1197 


69-2715 


79-34.65 


81-3536 


83-3645 


84 -3/4;- 


85-3845 


87-3935 


89-4005 


91-4072 




93-4122 


96-'. .'^16 


98-4280 


100-4314 


101-433? 


H?2'-43AO 


103-4582 








.PUUAI 


#15-1178 


15-1 !9/ 


















,EQUIV 


#15-1160 


#15-11/7 


#15-119/ 


#15-1197 


#15-1 '.'■■'; 


#V^-ri9/ 


#15-1197 


#15-1197 


#ls-H97 


#15-1197 




#15-1197 


#1.-1197 


#15-1197 


#15-119/ 


#15-1 r.\ 


^I.^-il''7 


#15-1197 


#15-1197 


#15-119/ 


#15-1197 




#15-1197 


#15-1197 


#15-1197 


#15-119/ 


#15-1197 


#15-1201 


#15-1202 


#15-1203 


#15-1204 


#15-120.^ 




#15-1206 


#15-120/ 


#15-1208 


^15-1209 














.HFADh 


#15-11/8 


15-il9S 


















.KTll 


#15-11/8 


15-1198 


















,3iJ[P 


#15-1178 


16-124 5 


















.SURMI 


#i5 1178 


15-1196 


















,SlJRi L) 


#10-1196 




















.$ACT1 


#15-1179 


^) 7-1^^7 
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SEUUENCF 168 


MACRO CROSS 


RtFERENCE 


CREF vol 


MACRO NAME 


REFERENCES 




.SAPTB 


^20-1249 


if^20-1249 


.$APTH 


#15-1181 


#18-1248 


,$APTY 


*15-1181 


43-1904 


.-bCATC 


#15-1179 


16-1246 


.SCMTA 


#15-1179 


19-1249 


.SDS^O 


#15-1182 


#48-1909 


.$EOP 


#15-584 


110-4609 


.SFRRO 


#15-771 


?;7-i787 


..SPOWE 


#15-nii-J 


50-1911 


.$KlAD 


ff \ J- i l(j 1 


ff^*-0-)ooL' 


.SSAVE 


#15-1182 


^47-1908 


.$SCOP 


#15-950 


#36-1785 


.$TRAP 


#15-1180 


49-1910 


.STYPB 


#15-1181 


A44-1905 


.$TYPt) 


#15-1180 


#46-1907 


,%npb 


#15-1179 


#42-190^ 


,$TYPO 


#15-1180 


43-1906 



M 13 



R 


1 


M 


MGMT 


PRT 


B 


MACRO 


C 


1 


H 


MGMT 


PRT 


B 


MACRO 


D 


1 


M 


MGMT 


PRT 


B 


MACRO 


K 


1 


M 


MGMT 


PRT 


B 


MACRO 


F 


1 


M 


MGMT 


PRT 


B 


MArno 


h 


1 


H 


MGMT 


PRT 


P- 


HACRO 


H 


1 


M 


Mr^";, 


\'X\ ' 


B 


MACRO 


1 


1 


M 


^GMT 


PRT 


B 


MACRO 


J 


1 


M 


MGMT 


PRT 


B 


MACRO 


K 


1 


M 


MGMT 


PRT 


B 


MACRO 


I 


i 


^: 


MGMT 


PRT 


B 


MACHO 


v\ 


1 


t-t 


MGMT 


PRT 


!) 


MACRO 


N 


i 

1 


M 


MGMr 


PRT 


1 ) 


MACRO 


n 


;•' 


M 


MGMT 


PRT 


B 


MACRO 


c 


z 


M 


MGMT 


(^RT 


B 


MACRO 


!-■ 




M 


MtiMT 


PR I 


B 


MACRO 


i. 


?. 


M 


MGMT 


[^RT 


B 


MACRO 


1 


2 


M 


MGMT 


PRT 


B 


MACRO 


G 


'J 


M 


MbMI 


PR I 


B 


MACRO 


H 


1 . 


M 


MGMT 


PRT 


t^ 


MACRO 


I 


'1 


M 


MGMT 


PRT 


P 


MACRO 


J 


2 


M 


MGMT 


PRT 


i^ 


MACRO 


K 


-J 
t_. 


M 


MGMT 


PRT 


n 


MACRO 


1. 


■J 


M 


MGMT 


PRT 


B 


MACRO 


M 


f. 


^1 


MGMT 


PRT 


B 


MACRO 


N 


^ 


M 


MGMf 


PHI 


B 


MACRO 


R 


5 


H 


MGMT 


PRT 


B 


MACRO 


C 


3 


M 


r ^T 


PRT 


B 


MACRO 


n 


:s 


M 


M(iMT 


PRT 


B 


MACRO 


F 


:5 


M 


MGMT 


PRT 


R 


MACRO 


1 


:s 


M 


MGMT 


PR I 


B 


MACRO 


G 


5 


M 


M6WT 


PRT 


B 


MACRO 


H 


'S 


M 


MGMT 


PRT 


B 


MACRO 


I 


5 


M 


MGMT 


PRT 


B 


M.ACRO 


J 


■< 


M 


MGMT 


PRT 


f? 


MACRO 


K 


r^ 


M 


MGMl 


PRT 


[] 


MACRO 


I, 


■ r 


M 


MGMT 


PRT 


B 


MACRO 


M 


? 


M 


M{*MI 


PRf 


H 


MACRO 


N 


.5 


fi 


MgMT 


PRI 


B 


MACRO 


R 


4 


M 


M(.MT 


PKT 


B 


MACRO 


C 


A 


M 


MGM] 


PRT 


B 


■XACRO 


t) 




M 


MGMI 


vni 


1 ■ 
k > 


MACRO 


L 


4 


M 


MQ'IT 


PRT 


B 


MACRO 


'■ 


■ i 


M 


MGMT 


PRT 


B 


MACRO 


C) 


A 


M 


MGMT 


PRI 


f^ 


MACr,0 


H 


''i 


M 


MGMT 


PRT 


B 


MACRO 


[ 


t 


M 


MGMT 


PR) 


H 


MACRO 


J 


''f 


M 


MCiMT 


ru) 


H 


MACRO 


K 


/* 


M 


MGMT 


PRT 


a 


MACRO 


1 


4 


M 


MGMT 


PRT 


B 


MACRO 


M 


4 


M 


MGMT 


nu 


n 


MAlRO 


N 


''. 


^1 


MG,Mr 


PRI 


B 


MACRO 


f{ 


s 


M 


M(,MI 


PRT 


B 


MACRO 


(" 


s 


M 


MGM1 


PRT 


H 


MACRO 


f^ 


S' 


M 


MGMT 


PR J 


n 


MACRO 


e 


'J 


M 


MGMI 


PRT 


H 


MACRO 


r 


s 


M 


MGMT 


PR J 


B 


MACRO 


(.1 


'i 


M 


MGMT 


PRT 


B 


MACRO 


H 


S' 


M 


MGMI 


PRI 


B 


MACRO 


i 


b 


M mm 


HUT 


ti 


MACRO 



M11 


r^ i' 


Mil 


l-S 1 


Mil 


13 1 


Mil 


1 "^ 1 


mil 


13 1 


Ml] 


13 1 


Mil 


13 1 


Mil 


13 1 


Mil 


■1 --* >■ 


Mil 


13 1 


MlJ 


} 3 1 


Mil 


13 1 


Mil 


13 1 


Nil 


13 1 


Mil 


13 1 


Mil 


13 1 


Mil 


13 1 


Mil 


13 1 


Mil 


1.5 1 


Mil 


13 1 


Mil 


13 1 


Mil 


13 1 


Mil 


13 1 


Mil 


13 1 


Mil 


13 1 


MVi 


1^ 1 


M11 


13 1 


Mil 


13 1 


M11 


1 3 1 


Mil 


13 1 


Mil 


13 1 


MM 


13 1 


Mil 


l.*) 1 


Mil 


13 1 


Mil 


r-^ t 


M11 


13 1 


M11 


13 1 


Mil 


1 "^ 1 


M11 


13 1 


Mil 


\ < "] 


Mil 


1 ^' "i 


MM 


1 ■^ 1 


Mil 


1 J" 1 
I.J f 


Mil 


1 _' I 


M1^ 


'; 3 1 


Mil 


13 1 


Mil 


13 1 


MM 


I 'i 1 


Mil 


13 1 


Mil 


13 1 


Mil 


1 3 T 


Mil 


13 1 


Mil 


1 ^ "i 


MM 


H 1 


Mil 


13 1 


Mil 


IS 1 


MM 


1 "* 1 


MM 


1 3 1 


Mil 


1 < •] 


Mil 


U 1 



J 


S 


M 


MGMT 


PRT 


B 


MACRO 


M1113 1 


K 


5 


M 


MGMT 


PRT 


B 


MACRO 


M1113 1 


L 


5 


M 


MGMT 


PRT 


B 


MACRO 


M1113 1 


M 


s 


M 


MGMT 


PRT 


B 


MACRO 


M1113 1 


N 


5 


M 


MGMT 


PRT 


B 


MACRO 


Min3 1 


B 


6 


f: 


MGMT 


PRT 


B 


M^CHO 


M1113 1 


C 


6 


M 


MGMT 




B 


MACRO 


M1113 1 


D 


6 


M 


MGMT 


p.'vr 


B 


MACRO 


Mil 13 1 


E 


6 


M 


MGMT 


PRT 


B 


MACRO 


Ml 113 1 


F 


6 


M 


MGMT 


PRT 


B 


MACRO 


M1113 1 


G 


^ 


M 


MGMT 


PRT 


B 


MACRO 


Mil 13 1 


B 


^1 


M 


MGMT 


PRT 


B 


MACRO 


Mil 13 1 


I 


6 


M 


MGMT 


PRT 


n 


MACRO 


M1113 1 


J 





M 


MGMT 


PRT 


B 


MACRO 


Mil 13 1 


K 


6 


M 


mm 


PRT 


B 


MACRO 


Ml 113 1 


{. 


6 


M 


r>,GMT 


PRT 


B 


MACRO 


Mil 13 1 


M 


6 


M 


MGMT 


PRT 


B 


MACRO 


M1113 1 


N 


6 


M 


MGMT 


PRT 


B 


MACRO 


M1113 1 


B 


/ 


M 


MGMT 


PRT 


B 


MACRO 


Min3 1 


C 


/ 


M 


MGMT 


PRT 


B 


MACRO 


Ml 113 1 


D 


7 


M 


MGMT 


PRT 


B 


MACRO 


Mill 3 ■) 


K 


7 


M 


MGMT 


PRT 


B 


MACRO 


Ml 113 1 


F 


7 


M 


MGMT 


PRT 


B 


MACRO 


Mrn3 1 


G 


7 


M 


MGMT 


PRT 


B 


MACRO 


Ml 113 1 


f) 


7 


M 


MGMT 


PRI 


B 


MACRO 


Ml 113 1 


I 


/ 


.1 


MGMT 


PRT 


B 


;iACRO 


Ml 113 1 


J 


7 


(5 


MGMT 


PRT 


B 


MACRO 


M1113 1 


K 


7 


M 


MGMT 


PRT 


B 


MACRO 


Ml 113 1 


I 


i 


M 


MGMT 


PRT 


B 


MACRO 


M1113 1 


M 


7 


M 


MGM: 


PRT 


r 


MACRO 


Ml VM 1 


N 


7 


M 


MGMr 


PRT 


B 


MACRO 


Hlli3 1 


p. 


8 


M 


MGMT 


PRT 


B 


MACRO 


Mil 13 1 


I 


8 


M 


MGMI 


PRT 


i 1 


MACRO 


MIT 13 1 


[■) 


8 


M 


MCvMT 


PRT 


B 


MACRO 


Ml 113 1 


i. 


8 


M 


MGMT 


PRT 


B 


MACRO 


Min3 1 


f 


8 


M 


MGMT 


PRT 


B 


MACRO 


Ml 113 1 


G 


8 


M 


MGMT 


PRT 


r"" 


MACRO 


Ml 1 1 -S 1 


H 


3 


M 


MGMT 


PKT 


B 


MACRO 


Ml rn 1 


I 


8 


M 


MGMT 


PM 


B 


MACRO 


Mil IS 1 


J 


8 


M 


MGMT 


.RT 


n 


MACRO 


Mvns 1 


K 


8 


M 


MGMi 


PRT 


H 


MACRO 


M1113 1 


[ 


8 


M 


MGMT 


pri 


B 


MACRO 


hiri3 1 


M 


8 


M 


MGMT 


PHT 


B 


MACRO 


Miri3 1 


N 


8 


M 


MGMT 


PRT 


B 


MACRO 


M1113 1 


B 


9 


M 


MGMT 


PRT 


B 


MACRO 


Mil 13 1 


C 


9 


M 


MGMT 


PRT 


B 


MACRO 


MM IS 1 


D 


9 


M 


MGMT 


PRT 


B 


MACRO 


Mi 113 1 


t 


9 


M 


MGMT 


PRi 


B 


MACRO 


M11K 1 


F 


9 


M 


MGMT 


PRT 


B 


MACRO 


Ml 113 1 


G 


9 


M 


MGMT 


PRT 


B 


MACRO 


M1113 1 


H 


9 


M 


mm 


PRT 


B 


^UCRO 


Ml 113 1 


i 


9 


M 


MGMT 


PRi 


B 


MACRO 


Ml 113 1 


J 


9 


M 


MGMT 


PRT 


B 


MACFiO 


MIIH 1 


K 


9 


M 


MGMT 


PRT 


B 


MACRO 


Mni3 1 


i 


9 


M 


MGMT 


FRf 


B 


MACRO 


Ml 113 1 


M 


9 


M 


MGMT 


PR! 


B 


MACRO 


MMH 1 


N 




M 


MGMT 


PRT 


B 


MACRO 


MM IS 1 


F^ 


10 


M 


MGMT 


PRI 


B 


MACRO 


MM 13 1 


C 


10 


M 


MGMT 


PRI 


B 


MCRO 


Mil 13 T 


D 


10 


M wm 


PRT 


B 


MACRUmili 1 



G 10 



10 
10 
10 
10 
10 
10 
10 
10 
10 

11 
11 
11 
11 
11 
11 
11 
11 
11 
11 
11 
11 
11 

12 
12 
1/ 
1.^ 
1^ 

12 

^2 

\2 
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